Private Sub Worksheet_Activate()
Me.ScrollArea = "$A$1:$C$10"
End Sub
Ulf
das nennt man Timing ;-)) o.T.
04.02.2005 17:09:41
Josef
Gruß Sepp
AW: Scroll Area
04.02.2005 17:09:03
Josef
Hallo Yoolia!
Im WorkbookOpen!
Private Sub Workbook_Open()
Sheets(1).ScrollArea = "A1:L32"
End Sub
Gruß Sepp
P.S.: Rückmeldung nicht vergessen!
Anzeige
AW: Scroll Area
04.02.2005 17:09:25
Jonny
Klick auf "alt" und F11,
dann suchst du das blatt auf der linken Seite aus, wo du die Scroll ARea einstellen willst.
Dann findest du drunter unter Eigenschaften, das Feld "Scroll Area" .. da kannste dann es eingeben.
so ein Blödsinn, Feld "Scroll Area" ist nur temp
04.02.2005 17:16:11
?
AW: Scroll Area
04.02.2005 17:15:40
Yoolia
Hallo Josef!
Danke für die schnelle Antwort.
Meine Datei besteht aus 36 Tabellenblättern. Die Bezüge sind nicht gleich, ich meine SCROLL AREA soll in jedem Blatt anders sein.
Wie sieht es da mit SRCOLL AREA aus.
Anzeige
AW: Scroll Area
04.02.2005 17:17:40
?
Setze diesen Code in die jewalligen Blätter und passe für das Sheet den Bereich an.
Gruß