Excel und VBA - Die Excel-FAQ

Scrollbereich begrenzen

Screenshots zu den Aufrufoberflächen der Excel-Materialien

Excel-Grundwerk (Beispiel-Arbeitsmappen) Excel-Tutorial Excel-Dialoge Excel-Forums-Archiv Excel-Grundlagen (Einführung) VBA-Grundlagen (Einführung) Zur Bestellseite

Scrollbereich begrenzen

Problem: Wie kann ich den Bewegungsraum des Cursors einschränken?


ClassModule: Tabelle1

Private Sub cmdBegrenzung_Click()
   If ActiveSheet.ScrollArea = "" Then
      Cells.Interior.ColorIndex = 15
      Selection.Interior.ColorIndex = xlColorIndexNone
      ActiveSheet.ScrollArea = Selection.Address
   Else
      ActiveSheet.ScrollArea = ""
      Cells.Interior.ColorIndex = xlColorIndexNone
   End If
End Sub