VBA Scroll Area

[Jack in the UK]

Hi guys can you help here

I ned to set the scroll area to the active cell ie lock the sheet

Also reset at the end to normal ie no scroll area setting

Can this be done?/

Cheers guys
JITUK

 

[NateO]

Howdy Jack, yes sir, see:

http://www.mrexcel.com/board/viewtopic.php?topic=18260&forum=2

You can use auto procedures or events to make this happen. Happy holidays.

 

[Jack in the UK]

Hi Nate

Im a bit behind here

I have

Sheets(5).ScrollArea = ActiveCell 'HardCoded

Which is terrible but you see where i am setting the currect active cell to fix the scroll??

 

[macamarr]

THIS WORKED FOR ME

Private Sub Workbook_Open()

Worksheets("Title Page").Activate
Sheet1.ScrollArea = "A1:R28"
End Sub

 

[NateO]

Howdy Jack, no errors and no functionality eh?

Try the address property:

Sheets(5).ScrollArea = ActiveCell.Address

This is the typical requirement with property setting as such.

Merry Christmas.

_________________
Cheers,<font size=+2><font color="red"> Nate<font color="blue"> Oliver</font></font></font>
This message was edited by NateO on 2002-12-21 20:30

 

[Jack in the UK]

Hi Nate now close to 2am London

Sleep now Ill use what i have and update this feel in a few hours - your be asleep then i guess.

Take care buddy and a very big thanks for your help here

JITUK