| Home |
| Search |
| Today's Posts |
|
|
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Dateformat
This just returns the daynumber, not the formati wish. Why oh Why. Please help With ActiveCell .Value = "*" .Offset(0, 1).Value = DTPicker1 ActiveCell.NumberFormat = "dd-mm-yyyy" .Offset(0, 3).Value = Val(txtMember) End With |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Dateformat
don't you want to format the cell containing the date?
With ActiveCell .Value = "*" .Offset(0, 1).Value = DTPicker1 .Offset(0,1).NumberFormat = "dd-mm-yyyy" .Offset(0, 3).Value = Val(txtMember) End With -- Regards, Tom Ogilvy "Kjeldc" wrote in message ... This just returns the daynumber, not the formati wish. Why oh Why. Please help With ActiveCell .Value = "*" .Offset(0, 1).Value = DTPicker1 ActiveCell.NumberFormat = "dd-mm-yyyy" .Offset(0, 3).Value = Val(txtMember) End With |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Dateformat
Thanks a lot. Somehow I had the idea, that .offset(0,1) WAS the activecell.
"Tom Ogilvy" skrev: don't you want to format the cell containing the date? With ActiveCell .Value = "*" .Offset(0, 1).Value = DTPicker1 .Offset(0,1).NumberFormat = "dd-mm-yyyy" .Offset(0, 3).Value = Val(txtMember) End With -- Regards, Tom Ogilvy "Kjeldc" wrote in message ... This just returns the daynumber, not the formati wish. Why oh Why. Please help With ActiveCell .Value = "*" .Offset(0, 1).Value = DTPicker1 ActiveCell.NumberFormat = "dd-mm-yyyy" .Offset(0, 3).Value = Val(txtMember) End With |
|
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Dateformat
Hi all
I am getting date as number, so copied .numberformat = "dd-mm-yy" as shown below sh1.Cells(rw, 4) = cell.Offset(0, 13).NumberFormat = "dd-mm-yy" ' date before i get number atleast, now i get "false". why ? how would i get the dates coming as numbers to date formats like "dd-mm-yy" or "dd ddd.mmm.yy" thanks "Tom Ogilvy" wrote: don't you want to format the cell containing the date? With ActiveCell .Value = "*" .Offset(0, 1).Value = DTPicker1 .Offset(0,1).NumberFormat = "dd-mm-yyyy" .Offset(0, 3).Value = Val(txtMember) End With -- Regards, Tom Ogilvy "Kjeldc" wrote in message ... This just returns the daynumber, not the formati wish. Why oh Why. Please help With ActiveCell .Value = "*" .Offset(0, 1).Value = DTPicker1 ActiveCell.NumberFormat = "dd-mm-yyyy" .Offset(0, 3).Value = Val(txtMember) End With |
|
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Dateformat
a = b = c
a will be true if b = c you probably want sh1.Cells(rw, 4).NumberFormat = "dd-mm-yy" ' date or cell.Offset(0, 13).NumberFormat = "dd-mm-yy" ' date "Eddy Stan" wrote in message ... Hi all I am getting date as number, so copied .numberformat = "dd-mm-yy" as shown below sh1.Cells(rw, 4) = cell.Offset(0, 13).NumberFormat = "dd-mm-yy" ' date before i get number atleast, now i get "false". why ? how would i get the dates coming as numbers to date formats like "dd-mm-yy" or "dd ddd.mmm.yy" thanks "Tom Ogilvy" wrote: don't you want to format the cell containing the date? With ActiveCell .Value = "*" .Offset(0, 1).Value = DTPicker1 .Offset(0,1).NumberFormat = "dd-mm-yyyy" .Offset(0, 3).Value = Val(txtMember) End With -- Regards, Tom Ogilvy "Kjeldc" wrote in message ... This just returns the daynumber, not the formati wish. Why oh Why. Please help With ActiveCell .Value = "*" .Offset(0, 1).Value = DTPicker1 ActiveCell.NumberFormat = "dd-mm-yyyy" .Offset(0, 3).Value = Val(txtMember) End With |
|
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Dateformat
Hi Patrick
thank you for quick & direct reply. sh1.Cells(rw, 4).NumberFormat = "dd-mm-yy" ' date - this worked (the otherone showed "false" message, but I understood (thanks Dave, ya it was evaluating & transferring the result true false) the data in sh1 is left justified, i need some more fine tuning such as (1) centering (2) high lighted in "light yellow" if it is greater than date at a3 in sheet sh1. Eddy Stan "Patrick Molloy" wrote: a = b = c a will be true if b = c you probably want sh1.Cells(rw, 4).NumberFormat = "dd-mm-yy" ' date or cell.Offset(0, 13).NumberFormat = "dd-mm-yy" ' date "Eddy Stan" wrote in message ... Hi all I am getting date as number, so copied .numberformat = "dd-mm-yy" as shown below sh1.Cells(rw, 4) = cell.Offset(0, 13).NumberFormat = "dd-mm-yy" ' date before i get number atleast, now i get "false". why ? how would i get the dates coming as numbers to date formats like "dd-mm-yy" or "dd ddd.mmm.yy" thanks "Tom Ogilvy" wrote: don't you want to format the cell containing the date? With ActiveCell .Value = "*" .Offset(0, 1).Value = DTPicker1 .Offset(0,1).NumberFormat = "dd-mm-yyyy" .Offset(0, 3).Value = Val(txtMember) End With -- Regards, Tom Ogilvy "Kjeldc" wrote in message ... This just returns the daynumber, not the formati wish. Why oh Why. Please help With ActiveCell .Value = "*" .Offset(0, 1).Value = DTPicker1 ActiveCell.NumberFormat = "dd-mm-yyyy" .Offset(0, 3).Value = Val(txtMember) End With |
|
#7
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Dateformat
You have 3 equal signs in that expression.
Excel is doing a comparison: cell.Offset(0, 13).NumberFormat = "dd-mm-yy" and evaluates that to true or false. And this portion: sh1.Cells(rw, 4) is assigned that value So maybe: sh1.Cells(rw, 4) = "dd-mm-yy" or cell.Offset(0, 13).NumberFormat = "dd-mm-yy" is what you want???? Eddy Stan wrote: Hi all I am getting date as number, so copied .numberformat = "dd-mm-yy" as shown below sh1.Cells(rw, 4) = cell.Offset(0, 13).NumberFormat = "dd-mm-yy" ' date before i get number atleast, now i get "false". why ? how would i get the dates coming as numbers to date formats like "dd-mm-yy" or "dd ddd.mmm.yy" thanks "Tom Ogilvy" wrote: don't you want to format the cell containing the date? With ActiveCell .Value = "*" .Offset(0, 1).Value = DTPicker1 .Offset(0,1).NumberFormat = "dd-mm-yyyy" .Offset(0, 3).Value = Val(txtMember) End With -- Regards, Tom Ogilvy "Kjeldc" wrote in message ... This just returns the daynumber, not the formati wish. Why oh Why. Please help With ActiveCell .Value = "*" .Offset(0, 1).Value = DTPicker1 ActiveCell.NumberFormat = "dd-mm-yyyy" .Offset(0, 3).Value = Val(txtMember) End With -- Dave Peterson |
|
#8
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Dateformat
Time to visit the eye doctor Dave... I only see two equal signs.<g
-- Rick (MVP - Excel) "Dave Peterson" wrote in message ... You have 3 equal signs in that expression. Excel is doing a comparison: cell.Offset(0, 13).NumberFormat = "dd-mm-yy" and evaluates that to true or false. And this portion: sh1.Cells(rw, 4) is assigned that value So maybe: sh1.Cells(rw, 4) = "dd-mm-yy" or cell.Offset(0, 13).NumberFormat = "dd-mm-yy" is what you want???? Eddy Stan wrote: Hi all I am getting date as number, so copied .numberformat = "dd-mm-yy" as shown below sh1.Cells(rw, 4) = cell.Offset(0, 13).NumberFormat = "dd-mm-yy" ' date before i get number atleast, now i get "false". why ? how would i get the dates coming as numbers to date formats like "dd-mm-yy" or "dd ddd.mmm.yy" thanks "Tom Ogilvy" wrote: don't you want to format the cell containing the date? With ActiveCell .Value = "*" .Offset(0, 1).Value = DTPicker1 .Offset(0,1).NumberFormat = "dd-mm-yyyy" .Offset(0, 3).Value = Val(txtMember) End With -- Regards, Tom Ogilvy "Kjeldc" wrote in message ... This just returns the daynumber, not the formati wish. Why oh Why. Please help With ActiveCell .Value = "*" .Offset(0, 1).Value = DTPicker1 ActiveCell.NumberFormat = "dd-mm-yyyy" .Offset(0, 3).Value = Val(txtMember) End With -- Dave Peterson |
|
#9
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Dateformat
You're right. I was counting in base Q.
Rick Rothstein wrote: Time to visit the eye doctor Dave... I only see two equal signs.<g -- Rick (MVP - Excel) "Dave Peterson" wrote in message ... You have 3 equal signs in that expression. Excel is doing a comparison: cell.Offset(0, 13).NumberFormat = "dd-mm-yy" and evaluates that to true or false. And this portion: sh1.Cells(rw, 4) is assigned that value So maybe: sh1.Cells(rw, 4) = "dd-mm-yy" or cell.Offset(0, 13).NumberFormat = "dd-mm-yy" is what you want???? Eddy Stan wrote: Hi all I am getting date as number, so copied .numberformat = "dd-mm-yy" as shown below sh1.Cells(rw, 4) = cell.Offset(0, 13).NumberFormat = "dd-mm-yy" ' date before i get number atleast, now i get "false". why ? how would i get the dates coming as numbers to date formats like "dd-mm-yy" or "dd ddd.mmm.yy" thanks "Tom Ogilvy" wrote: don't you want to format the cell containing the date? With ActiveCell .Value = "*" .Offset(0, 1).Value = DTPicker1 .Offset(0,1).NumberFormat = "dd-mm-yyyy" .Offset(0, 3).Value = Val(txtMember) End With -- Regards, Tom Ogilvy "Kjeldc" wrote in message ... This just returns the daynumber, not the formati wish. Why oh Why. Please help With ActiveCell .Value = "*" .Offset(0, 1).Value = DTPicker1 ActiveCell.NumberFormat = "dd-mm-yyyy" .Offset(0, 3).Value = Val(txtMember) End With -- Dave Peterson -- Dave Peterson |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| DateFormat (dd-mmm-yyyy) (dd-mmm-jjjj) Problem. | Excel Programming | |||
Hybrid Mode
