Help with VBA timin issue on task scheduler

Hi,
I have obtained this VBA from the forum and have tried to changed it for my needs but whatever I do doesn't seem to work.

Can anyone out there see where I have gone wrong. When Task scheduler runs, I want it to run 3 macros if the time is before 6.30am but only run 2 after that. It will open the Excel file at 6am, but nothing seems to happen as the excel report remains open unti I arrive into work.

Code:

---

Private Sub TestInteractive()
Application.DisplayAlerts = False
If GetActiveWindow() = 0 Then
' We're running via the Task Scheduler: Update the Spreadsheet/Graph
If Workbooks.Count = 1 Then
If TimeValue(Now()) <= TimeValue("06:30:00") Then
Call Macro3
Call Hide
Call Mail_Sheet_Outlook_Body
ActiveWorkbook.Save
Application.Quit
Else
If GetActiveWindow() = 0 Then
' We're running via the Task Scheduler: Update the Spreadsheet/Graph
If Workbooks.Count = 1 Then
Call Hide
Call Mail_Sheet_Outlook_Body
ActiveWorkbook.Save
Application.Quit
Else
Me.Close True 'save the changes and close the workbook
Application.DisplayAlerts = True
End If
End If
End If
End If
End If
End Sub

---

Hi

Welcome to forum !

What happens if you run it manually (Pressing F8) by skipping the time criteria?

Code:

---

If

Elseif

Else

End if

---

Hi snb,

The vb worked perfectly before I put the timing issue i, before all I needed was to run the sheet once, which created a new column for the current days information. Now I have to run it more than once per day, I don't want a new column created every time I run it.

I know I have probably made this more complicated than it needs to be as I am not very prificient at VB. I managed to get this far by manipulating VB that I found on the internet.

As for your suggestion to skip the timing criteria, I have no way of understanding where to put this within the VB I have. But thanks for the reply and at least thinking of a way round it.

Hi

It's a Cross Post

Please read Message to cross posters in my signature

Hi,

Sorry, didn't realise both forums were linked, I have posted this on the Ozgrid forum.

VBA time value for task scheduler

Thanks