Dateformat

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

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
 
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
 
Thanks a lot. Somehow I had the idea, that .offset(0,1) WAS the activecell.

"Tom Ogilvy" skrev:
 
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
 
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
 
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????
 
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
 
Back
Top