Hi, I want to run some conditions for one browser and do the same for browsers.When i try "Application.OnTime TimeToRun, "Chrome"" its working fine ,but when i want to do the same for 3 browser at same time its taking only last condtions .
Pleass find the code below and let me know how to run all 3 conditions same time.
Sub DeleteonTime()
Dim a As String
a = ThisWorkbook.Sheets("Sheet1").TextBox1.Value
TimeToRun = Now + TimeValue(a)
If UserForm1.IE.Value = True Then
intFlag = 1
Application.OnTime TimeToRun, "Callfunction"
End If
If UserForm1.Chrome.Value = True Then
intFlag = 1
'TimeToRun = Now + TimeValue(a)
Application.OnTime TimeToRun, "Chrome"
End If
If UserForm1.FF.Value = True Then
intFlag = 1
Application.OnTime TimeToRun, "FireFox"
End If
End Sub