Excel Timer

Alexxx12 · #1 (**permalink**) 10-01-04, 12:32

Hi
Win2k, Xp
Excel2k

When I Run A Macro For The Timer, It Appears In All The Sheet Within The Workbook Or Any Other Opened Workbook. Is There A Way To Only Have It Appear In One Sheet And The Others???

Code:

Sub StartTimer()
On Error Resume Next
RunWhen = Now + TimeSerial(0, 0, cRunIntervalSeconds)
Application.OnTime earliesttime:=RunWhen, procedure:=cRunWhat, schedule:=True
End Sub

Sub StopTimer()
   On Error Resume Next
   Application.OnTime earliesttime:=RunWhen, procedure:=cRunWhat, schedule:=False
   Range("j2").Interior.ColorIndex = 8
   Range("j2").Borders.LineStyle = True
   Application.OnTime earliesttime:=Now, procedure:=NAME, schedule:=False
     
End Sub

DavidCoutts · #2 (**permalink**) 10-26-04, 08:13

Hi Alexxx,

Just fully reference where you want the timer to write
i.e. instead of range("J2") use
Workbooks(bookName).Worksheets(SheetName).Range("J 2")

HTH
Dave

Internet Services

Web Development

Digital Marketing

Consumer Tech