View Full Version : Solved: Need to append todays date as text to the end of the selected Cell Text

11-27-2010, 11:05 AM
I need to append today's date to the end of whatever data may or may not already be in the selected cell. The cell is formatted as text so the result I'm after is a text string. I Also wish to put a comma before each date that I add to the string.

ie: "ExistingStringData,11/01/10,11/05/10,12/01/10" (without the quotes)

Thanks in advance

11-27-2010, 11:30 AM
With ActiveCell

.Value = .Value & ", " & Format(Date, "mm/dd/yyyy")
End With

11-27-2010, 11:56 AM
Thank you very much xld. -- I really appreciate it.:beerchug: