Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.03.2024 13:14:12
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
488to492
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
488to492
488to492
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

ScrollArea mit Bedingungen

ScrollArea mit Bedingungen
20.09.2004 18:53:35
Lorenz
Guten Abend!
mit diesemn kleinen Code wird mit dem Ereignis Worksheet_Change der
"BereichGrenzen" aufgerufen. Leider schaffe ich es nicht mit mehr Bedingungen (bis zu zehn verschiedene). Gehts eventuell mit Select Case?

Sub BereichGrenzen()
If Range("a1").Value = "test" Then
ActiveSheet.ScrollArea = "c1:e5"
ElseIf Range("a1").Value = "neu" Then
ActiveSheet.ScrollArea = "c6:e10"
ElseIf Range("a1").Value = "alt" Then
ActiveSheet.ScrollArea = "c11:e15"
Else: ActiveSheet.ScrollArea = "a1:a1"
End If
End Sub

Danke im Voraus!
Gruss Lorenz

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: select case oT
Dieter
Danke! erledigt! Select Case! oT
Lorenz
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige