Is het mogelijk een macro twee maal per werkdag op een vaste tijd te laten lopen

[Depant]

Hallo allemaal,

Ik heb een zelf bij elkaar geknustelde macro.
Kan ik die twee maal per dag op een vaste tijd laten lopen?? ( liefst werkdagen).
De macro zit in het bijgevoegde bestand.

Bekijk bijlage hm1.xlsm

Groeten Henk Harbers

 

[Cobbe]

Test deze eens, macro 'gew' wordt om 11 u en om 16 u uitgevoerd:

Private Sub Workbook_Open()
If Application.WorksheetFunction.Weekday(Date, 2) > 5 Then
 Application.OnTime TimeValue("11:00:00"), "gew"
  Application.OnTime TimeValue("16:00:00"), "gew"
End If
End Sub

 

[Depant]

Waar te plaatsen?

Goedemorgen,

Hartelijk bedankt voor uw antwoord.
Ik heb hem geplaatst waar ik dacht..... dat nodig was.
Maar hij werkt niet. Zou u eens willen kijken.
Ik heb het bestand geupload als hm2.

Bekijk bijlage hm2.xlsm

Hartelijk bedankt voor uw tijd en moeite.


Vriendelijke groeten Henk Harbers.

 

[Cobbe]

Ja stom de weekdagcheck was verkeerd, de macro liep enkel in de weekends:

Private Sub Workbook_Open()
If Application.WorksheetFunction.Weekday(Date, 2) [COLOR="#FF0000"][B]< 6[/B][/COLOR] Then
 Application.OnTime TimeValue("08:35:00"), "gew"
  Application.OnTime TimeValue("16:00:00"), "gew"
End If
End Sub

 

[Depant]

Helemaal TOP!!!

:d:d:d