If this is your first visit, be sure to check out the FAQ by clicking the link above.
You may have to register before you can post: click the register link above to proceed.
To start viewing messages, select the forum that you want to visit from the selection below.
Sub SchedullingAJob()
Application.OnTime TimeValue("17:00:00"), "Procedure1"
Application.OnTime TimeValue("17:00:00"), "Procedure2"
End Sub
Sub Procedure2()
Dim wkb1 As Workbook
Set wkb1 = Workbooks.Open("c:\myfile1.xls")
End Sub
Sub Procedure1()
Dim wkb2 As Workbook
Set wkb2 = Workbooks.Open("c:\myfile2.xls")
End Sub