Aktion bei Mausklick

• Aktion bei Mausklick von Kalle vom 25.09.2003 17:26:42
  • AW: Aktion bei Mausklick - von Jessi am 25.09.2003 17:36:36
    • meinte diesen code!!! - von Jessi am 25.09.2003 17:39:01

Betrifft: Aktion bei Mausklick
von: Kalle
Geschrieben am: 25.09.2003 17:26:42
Ich begrüße Euch,
es geht sich um folgendes:
Wie kann ich beim klicken in einer Zelle per VB eine Aktion aüsführen, z.B. ein Wort in diese Zelle schreiben lassen, um diese Zeile als selektiert auszuweisen? und das in allen Zellen die ich anklicke.
Besten Dank für Eure Hilfe

Betrifft: AW: Aktion bei Mausklick
von: Jessi
Geschrieben am: 25.09.2003 17:36:36
hallo kalle,

in das arbeitsblatt diesen code einfügen einfügen

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 1 And Target.Row = 1 Then
MsgBox "Hallo Peter, das ist Spalte A:1"
End If
End Sub

dann auf zelle a klicken und es kommt eine msgbox.
evtl. hilft dir das weiter.

gruß
jessi

Betrifft: meinte diesen code!!!
von: Jessi
Geschrieben am: 25.09.2003 17:39:01
habe mich vertan,

dieses ist der richtige.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 1 Then
MsgBox "Hallo Peter, das ist Spalte A"
End If
End Sub

gruß
jessi

Excel-Beispiele zum Thema " Aktion bei Mausklick"
Makroaktion über die UnDo-Schaltfläche zurücknehmen	Aktion nach Auswahl in Gültigkeitsliste
Zeilen-Aktionen bei Doppelklick	VBA-Aktion über "Rückgängig"-Schaltfläche zurücksetzen
Arbeitsmappe öffnen und nach Beenden des Mausklicks schließen