Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
24.04.2024 18:49:56
24.04.2024 17:19:09
Anzeige
Archiv - Navigation
1292to1296
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

Bestimmte Makro ausführen bei bestimmte Werte

Bestimmte Makro ausführen bei bestimmte Werte
12.01.2013 20:44:49
nibio
Liebe Excel-Profis,
Sub ms_start()
Dim I As Integer
If Range("m16") = 1 Then
Call makro1
Exit For
Else
Call makro2
End If
Next
End Sub

O.g. Script startet entweder Makro1 (wenn wert in A16 = 1) oder Makro2 (wenn A16 1).
Seit heute morgen versuche ich den Script so anzupassen dass bei Wert 1 Makro1 startet, Wert 2 = Makro 2, Wert 3 = Makro3 usw. bis auf 30 Makros. Ohne Erfolg :-(.
Könnte mir B I T T E jemand helfen? Herzlichen Dank im Voraus.
Gruß
Nibio

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

Betreff
Datum
Anwender
Anzeige
Select Case Range("m16").Value
12.01.2013 20:49:55
Matthias
Hallo Nibio
Probiers mal so
Option Explicit
Sub ms_start()
Select Case Range("m16").Value
Case Is = 1
Call makro1
Case Is = 2
Call makro2
Case Is = 3
Call makro3
Case Is = 4
Call makro4
' ... usw
End Select
End Sub
Gruß Matthias

AW: Select Case Range("m16").Value
12.01.2013 20:57:06
nibio
wow, so schnell?
Und funktionieren tut es auch!! Danke vielmals Matthias, wenn ich blos denke wie viel Zeit ich verloren habe :-(
Danke vielmals
Gruß
Nibio

AW: Bestimmte Makro ausführen bei bestimmte Werte
12.01.2013 20:54:11
Peter
Hallo Nibio,
vielleicht so:
Option Explicit
Public Sub Makro_Wahl()
Select Case Thisworkbokk.workshetts("Tabelle1").Range("A1")
Case 1: Call Makro1
Case 2: Call Makro2
Case 3: Call Makro3
Case 4: Call Makro4
' usw.
End Select
End Sub

Gruß Peter
Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige