I am writing a macro to save the name in cell A1 and I have a date Value in
cell B5

I am wanting excel to suggest for example greg 15 june 2005

here is the code so far but it wont save because it is coming up 16/6/2005

Suggestion = Range("A1").Value & Range("B5")

Thank in advance

Greg

Suggestion = Range("A1").Value _
& lcase(format(Range("B5").value,"dd mmmm yyyy"))

Greg Brow wrote:

I am writing a macro to save the name in cell A1 and I have a date Value in
cell B5

I am wanting excel to suggest for example greg 15 june 2005

here is the code so far but it wont save because it is coming up 16/6/2005

Suggestion = Range("A1").Value & Range("B5")

Thank in advance

Greg

--

Dave Peterson

thanks worked a charm

Greg

Just some added info:
If the cells look as you want, you could simplify that to

Range("Whatever").Value = Range("A1").Text & " " & Range("B5").Text
or
Range("Whatever").Value = Trim(Range("A1").Text) & " " & _
Trim(Range("B5").Text)


Text displays as the cell displays
Value displays what is actually stored in the cell.

If you want Dave's solution to return what you stated, you might want to add

Suggestion = trim(Range("A1").Value) & " " & _
& lcase(format(Range("B5").value,"dd mmmm yyyy"))

--
Regards,
Tom Ogilvy


"Greg Brow" wrote in message
...
thanks worked a charm

Greg

Thanks will try them all to see what works the best

Greg
"Tom Ogilvy" wrote in message
...
Just some added info:
If the cells look as you want, you could simplify that to

Range("Whatever").Value = Range("A1").Text & " " & Range("B5").Text
or
Range("Whatever").Value = Trim(Range("A1").Text) & " " & _
Trim(Range("B5").Text)


Text displays as the cell displays
Value displays what is actually stored in the cell.

If you want Dave's solution to return what you stated, you might want to
add

Suggestion = trim(Range("A1").Value) & " " & _
& lcase(format(Range("B5").value,"dd mmmm yyyy"))

--
Regards,
Tom Ogilvy


"Greg Brow" wrote in message
...
thanks worked a charm

Greg