Hello everyone. I would like to create a workbook open event that calls a
procedure within the same workbook ONLY if the workbook is opened on a
Monday. All other days the open event would call nothing. Is this
possible? Thanks!

Private Sub Workbook_Open()
If Weekday(Date, vbMonday) = 1 Then
Call DramaticMacro
End If
End Sub

HTH. Best wishes Harald

"Steph" skrev i melding
...
Hello everyone. I would like to create a workbook open event that calls a
procedure within the same workbook ONLY if the workbook is opened on a
Monday. All other days the open event would call nothing. Is this
possible? Thanks!

Have you considered using the WEEKDAY worksheet function in your worksheet_open event? You would put this in the "ThisWorkbook"
module. Your code would start with:

Private Sub App_WorkbookOpen(ByVal Wb As Workbook)

dyDay = Weekday(Now(), 1)
If dyDay = 2 Then
' some code here
End If

End Sub

--
RMC,CPA


"Steph" wrote in message ...
Hello everyone. I would like to create a workbook open event that calls a
procedure within the same workbook ONLY if the workbook is opened on a
Monday. All other days the open event would call nothing. Is this
possible? Thanks!