You might also try:


' Macro Wrote: 9/24/2002 by J. B. MOSS
'
Range("H30").Select
SendKeys "^;~", True ' Send Ctrl + ;(DATE)
Range("I30").Select
SendKeys "^+:~", True ' Send Ctrl + :(TIME)
Range("A5").Select


"jonco" wrote in message
y.net...
I want to set the value of a cell to the current date when a macro is run
without actually selecting the date (if possible).
Here's what I'm trying to use and it's not working. .

Dim LastPaid As Range
Set LastPaid = wks.Range("N2")
Set LastPaid = Value.Now()

I know this is probably simple but it has me perplexed.

Than ks
Jonco