Or maybe:

application.wait now + timeserial(0,0,10)

The program just sits there and does nothing for 10 seconds.



Craig Coope wrote:

IS it possible to program a button to do something simple, such as
input a "1" into cell A1 but 10 seconds after the button is pressed.

I'm looking for something like:

Private Sub CommandButton1_Click()
"10 seconds timer" (and then)
Range("a1") = 1
end sub

Cheers,

Craig

--
The Zero ST

--

Dave Peterson