Scroll area settings not saved after macro

[tfdd]

Can someone help me to find out why the following code is not keeping the scroll area permanent?

I used the Workbook_Open event procedure (in the "numbers" sheet module)

Private Sub Workbook_Open()
Sheets("numbers").ScrollArea = "$A$5:$M$155"
End Sub

I have also tried this one in the worksheet:

Private Sub Worksheet_Activate()
ActiveSheet.ScrollArea = "$A$5:$M$155"
End Sub

They both work when the macro is ran, but after saving the excel file, closing it and reopen it, the scroll area is reset, doesn't keep the properties of the macro.

Thanks!

 

[EXCEL MAX]

Hello Tfdd,
Workbook_Open event is part of ThisWorkbook module, not sheet module.
In the Project explorer window select ThisWorkbook,
find Workbook_Open event in the code editor and insert this code there...

 

[tfdd]

Yes, my bad... Thank you very much for the clarification.

 

[EXCEL MAX]

It's great if it's now OK.