my main macro starts with an input box and i want to bypass input box when
repeating macro1.
how would i goto a procedure in main macro. the following repeats 2 macros 1
every 10 min & 1 every 30 min.

if count 1 then i want to goto a procedure position in macro1 and bypass
an input box .
would the end sub in macro1 reset all parameters? i was wondering how to
keep the string value from input box in first cycle to use in repeat cycles.
is there an easier way to handle a repeat loop.

Sub refresh()
Static Counter As Integer
Static Count As Integer
Counter = Counter + 1
Count = Count + 1
' get data from web site #1
' if count is 1 goto repeat procedure in macro1 & not start of macro1

' start macro1
Windows("test.xls").Activate
Application.Run "'test.xls'!macro1"

If Counter = 3 Then
Counter = 0
' get data from web site #2
Windows("test.xls").Activate
Application.Run "'test.xls'!macro2"
End If
RunWhen = Now + TimeSerial(0, 10, 0)
Application.OnTime earliesttime:=RunWhen, _
procedu="refresh", schedule:=True

End Sub

thanks