run a macro every second

[earp_]

Hi if I want to run a macro every second do I need to do something like that?

Sub Autpen()
Application.OnTime Now, "myMacro"
End Sub

Sub myMacro
...
mdNextTime1 = Now + TimeValue("00:00:01")
Application.OnTime mdNextTime1, "myMacro"
End Sub

but this creates a kind of blinking in excel because it copies things from a Sheet to another one.
Is this the best way or do you know something else?

 

[Joe4]

You probably won't see it until the macro stops running (until it hits the Application.ScreenUpdating=True at the end of the code).