Workbook Open not working

[ExcelRoy]

Hi all,

seem to be having a little problem with the following not working

Private Sub Workbook_Open()

Call Clear_Rep_Backorders
Call Clear_Ref_Backorders
Call Clear_Wa_Backorders
Call Clear_board
Call Clear_Q_Backorders
Call Delete_Names

End Sub

An ideas why this may be happening

Many thanks

 

[Joe4]

Are Macros/VBA enabled?

An easy way to verify is to add this line:

Private Sub Workbook_Open()

[COLOR=#ff0000]MsgBox "Running Workbook_Open code"[/COLOR]

Call Clear_Rep_Backorders
Call Clear_Ref_Backorders
Call Clear_Wa_Backorders
Call Clear_board
Call Clear_Q_Backorders
Call Delete_Names

End Sub

If you get the message box, then you know that the code is enabled and running. So then I would suspect an issue with the code you are calling.

 

[ExcelRoy]

Hi Joe4,

thanks, no message popped

here is the code I am calling

Sub Clear_Rep_Backorders()
    Sheets("Update").Select
    Range("C3:S502").Select
    Selection.ClearContents
    Range("A1").Select
End Sub

Sub Clear_Ref_Backorders()
    Sheets("Update").Select
    Range("AC3:AS502").Select
    Selection.ClearContents
    Range("A1").Select
End Sub

Sub Clear_Wa_Backorders()
    Sheets("Update").Select
    Range("BC3:BS502").Select
    Selection.ClearContents
    Range("A1").Select
End Sub

Sub Clear_board()
    Sheets("Update").Select
    Range("CC3:CW10002").Select
    Selection.ClearContents
    Range("A1").Select
End Sub

Sub Clear_Q_Backorders()
    Sheets("Update").Select
    Range("DE3:EC502").Select
    Selection.ClearContents
    Range("A1").Select
End Sub

Thanks

 

[Joe4]

thanks, no message popped

That means that either you are not allowing VBA/Macros to run, or you have disabled events.

Try closing out of Excel and re-opening it and try again. If you still do not get the MsgBox, check your Excel security settings to see what they are set to.

 

[ExcelRoy]

Hi Joe4,

tried re-opening several times, checked macros enabled, checked each line of code and works when run

just strange why this wont work when opened up from scratch

Thanks

 

[Fluff]

Is the Private Sub Workbook_Open() code in the ThisWorkbook module?

 

[ExcelRoy]

Hi Fluff,

no its in Module 11

 

[Fluff]

It needs to be in the ThisWorkbook module.
That's why it's not working.

 

[ExcelRoy]

Thanks Fluff, works perfect now

 

[Fluff]

Glad we could help & thanks for the feedback