Scroll Area Problem

[Tim Davies]

I have a problem in that I set a scroll area on a sheet in VBA, press the
save button in VBA, and then return to my worksheet, test the scroll area,
and it works perfectly. I then save the workbook, and close it. When I open
it again, it asks me wether I want to enable macros, so I do enable them, but
find that the scrool limits have dissapeared in VBA, and do not work in the
sheet.
Can anyone help/explain what I'm doing wrong?

Tim

 

[JNW]

The scroll area setting does not save when the workbook is closed. You have
to set it manually with the workbook_open event.

 

[Tim Davies]

Thanks, How would I go about doing that?

 

[JNW]

In ThisWorkbook paste the following:
Private Sub Workbook_Open()
Sheets("mysheet").ScrollArea = "A110"
End Sub

Make sure to change the sheet name and range. You can repeat the line for
all the sheets you want to limit.

 

[Tim Davies]

Where do I need the "'s and, should I use the Name of the sheet or the (name)
of the sheet?

 

[JNW]

I always use the sheet name that appears in excel on the sheet tab. Doing
this you need to use the quotation marks. If you refer to the sheet number
as provided by VBA you do not need the quote marks.

 

[Tim Davies]

I have got this code in the branch "microsoft excel projects", then "Sheet2
(Room Sessions):
Private Sub Workbook_Open()
Sheets("Room Sessions").ScrollArea = A1: AA72
End Sub

Yet this still does not help.

 

[JNW]

It can't be in the sheets code. It has to be in the "ThisWorkbook" code.
Also, you need quotes around the area listed as the scroll area. Also remove
the space after the colon.

In VBA, unless something is defined in VBA itself (not even excel) or a
number it must have quotes around it.

 

[Tim Davies]

Thank you so much, you are an absolute deity at this!!!

Tim