Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Makro nach Verlassen einer Zelle ausführen

Gruppe

SelectionChange

Problem

Wie kann ich Excel dazu veranlassen, nach Verlassen einer bestimmten Zelle ein Makro auszuführen?

Lösung
Geben Sie den Ereigniscode in das Klassenmodul des Arbeitsblattes ein.

ClassModule: Tabelle1

Dim bln As Boolean

Private Sub Worksheet_SelectionChange _
   (ByVal Target As Excel.Range)
   Dim rng As Range
   Set rng = Range("D6")
   If Target.Address = rng.Address Then bln = True
   If bln = True And Target.Address <> rng.Address Then
      Call MyMacro
      bln = False
   End If
End Sub

Sub MyMacro()
   MsgBox "Sie waren soeben in Zelle D6!"
End Sub