shamas21
Active Member
- Joined
- Nov 19, 2007
- Messages
- 280
Hi All
I have the following code for illustration purposes, im trying to delay my code for every loop by half a second. However, the code i have delays it by one second. How can i modify it so it delays it by the half second?
Thanks
I have the following code for illustration purposes, im trying to delay my code for every loop by half a second. However, the code i have delays it by one second. How can i modify it so it delays it by the half second?
Thanks
Code:
Sub mac1()
Dim i As Integer
i = 1
Range("A1").Activate
Do Until ActiveCell.Offset(, 1) = 1
Columns(i).Select
Selection = "A"
Application.Wait Now() + TimeValue("0:00:01")
i = i + 1
Loop
End Sub