Live-Forum - Die aktuellen Beiträge
Datum
Titel
23.04.2024 17:41:19
Link erstellen mit Formel oder VBA?
23.04.2024 17:00:22
Summe und Ausgabe
23.04.2024 16:27:34
Excel Starthinweis - Arbeitsmappenleistung überprüfen ...
23.04.2024 16:15:16
Mittels VBA vordefinierte Kommentare in Zellen einfügen?
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1220to1224
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1220to1224
1220to1224
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Makro2 aufrufen wenn AI2 = 2

Makro2 aufrufen wenn AI2 = 2
Markus
Hallo,
vielleicht suche ich falsch oder es existiert wirklich kein Eintrag im Archiv.
Mein Problem:
ich habe verschiedene Makros: makro1, makro2, makro3.
Wenn ich in AI2 eine "2" eingebe, soll makro2 gestartet werden, 1 dann makro1, etc.
Besten Dank für Hilfe
Markus

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Makro2 aufrufen wenn AI2 = 2
18.07.2011 20:07:50
Hajo_Zi
Hallo Markus,
warum soviel Makros, rufe doch nur eins auf. 

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$AI$2" Then Makro1 Target.Value
End Sub
Sub Makro1(LoWert As Long)
Select Case LoWert
Case 1
' code für 1
Case 2
' code für 2
End Select
End Sub


AW: Makro2 aufrufen wenn AI2 = 2
18.07.2011 20:08:36
Tino
Hallo,
kommt als Code in die entsprechende Tabelle.
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Range("AI2"), Target) Is Nothing Then Exit Sub

Select Case Range("AI2")
    Case 1: Call Makro1
    Case 2: Call Makro2
    Case 3: Call Makro3
    'usw... 
End Select

End Sub
Gruß Tino
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige