Excel VBA macro to run automatically based on environment user

[David Montoya]

Dear, I would like to have a macro running automatically on a daily basis (if workbook is opened), on assigned schedule, and based on the environment user name.
I have come up to the following code, but it does not work, and need your assistance to perfected:

Sub RunSchedule()
If Environ$("username") = "user1" Then
Aplication.OnTime TimeValue("16:40:00"), "macroname"
ElseIf Environ$("username") = "user2" Then
Aplication.OnTime TimeValue("16:45:00"), "macroname"
ElseIf Environ$("username") = "user3" Then
Aplication.OnTime TimeValue("16:50:00"), "macroname"
End If


End Sub

Thanks in advance for your valuable assistance.

 

[Yongle]

1. You need this procedure in ThisWorkbook module to trigger your macro

Private Sub Workbook_Open()
    RunSchedule
End Sub

2. Application.OnTime not Aplication.OnTime

 

[David Montoya]

Yongle, excellent help!! Thanks a lot