Try both numberformat options, maybe one of them will be OK.
[vba]Set WsTgt = Workbooks("Gardens History.xls").Sheets(1)
With WsTgt.Range("A" & NextEmptyRow(WsTgt))
.Value = Date
.NumberFormat = "dddd dd mmm yy"
.NumberFormat = "ddd dd mmm yy"[/vba]
Jimmy
-------------------------------------------------
The more details you give, the easier it is to understand your question. Don't save the effort, tell us twice rather than not at all. The amount of info you give strongly influences the quality of answer, and also how fast you get it.
Posting Permissions
Reply With Quote