Herbers Excel-Forum - das Archiv

Aktion bei Mausklick

Bild

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

Bild

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
Bild

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
 Bild
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