Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1616to1620
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Makros starten durch Zellenklick

Makros starten durch Zellenklick
10.04.2018 11:58:40
Jens
Liebe helfenden,
ich habe mehrere Makros, welche die Tabelle nach unterschiedlichen Farben filtert.
Gestartet werden diese durch einen Klick auf eine bestimmte Zelle.
Wie zum Beispiel:
Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$A$3" Then Call krank
End Sub
Nun habe ich ein "Problemchen", füge ich eine zweite code Zeile hinzu:
Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$A$3" Then Call krank
End Sub
Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$D$1" Then Call urlaub
End Sub
erhalte ich folgenden Kompilierungsfehler:
Mehrdeutiger Name: Worksheet_SelectionChange
Über eine Hilfestellung diesbezüglich würde ich mich sehr freuen.
Vielen Dank im Voraus

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Schreibe es z. B. dann...
10.04.2018 12:05:29
Case
Hallo, :-)
... so: ;-)
Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Select Case Target.Address
Case "$A$3"
Call krank
Case "$D$1"
Call urlaub
End Select
End Sub
Servus
Case

AW: Makros starten durch Zellenklick
10.04.2018 12:07:46
Daniel
Hi
da brauchst du nur ein Makro:

Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$A$3" Then Call krank
If Target.Address = "$D$1" Then Call urlaub
End Sub
etwas eleganter wäre:

Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Select Case Target.Address(0, 0)
Case "A3": Call krank
Case "D1": Call Urlaub
Case Else
end select
End Sub

Anzeige
AW: Makros starten durch Zellenklick
10.04.2018 12:14:02
Jens
Vielen Dank liebe Leute, passt! :)

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige