Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
192to196
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
192to196
192to196
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

ScrollArea

ScrollArea
18.12.2002 11:14:41
Matthias H.
Hallo,

ich möchte innerhalb eines Arbeitsblattes nur einen bestimmten Zellbereich zum anklicken/markieren zur Verfügung stellen.
Das mache ich mit
Sheets("Worksheet").ScrollArea = "A5:F15"

Zusätzlich zu diesem Bereich soll aber auch noch "A42:I100" markierbar sein. Wie kann ich diese beiden (und evtl. noch mehr) Bereiche als ScrollArea definieren?

Gruß
Matthias


1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: ScrollArea
18.12.2002 11:25:40
Georg_Zi
Hallo Matthias

immer wenn die letzte Zelle im Bereich gewählt wird, wird ein neuer Bereich definiert.

scrollAreas definieren, wenn du Lust hast:
Private Sub Worksheet_Activate()
ActiveSheet.ScrollArea = "$A$1:$C$10"
End Sub
'hier wird zwischen zweien gewechselt
'du kannst aber noch mehrere definieren
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
If Target.Address = "$C$10" Then
ActiveSheet.ScrollArea = "$D$11:$E$20"
ElseIf Target.Address = "$E$20" Then
ActiveSheet.ScrollArea = "$A$1:$C$10"
End If
End Sub
von ManuelaM

Gruß Georg

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige