VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Scrollbereich begrenzen

Gruppe

Allgemein

Bereich

Ansicht

Thema

Scrollbereich begrenzen

Problem

Wie kann ich den Bewegungsraum des Cursors einschränken?

Lösung

Den nachstehenden Code in die "Personl.xls" einfügen und einer Symbolleistenschaltfläche zuweisen.




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

    


Beiträge aus dem Excel-Forum zu den Themen Allgemein und Ansicht