Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1324to1328
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

Case

Case
30.07.2013 08:12:50
Joe
Hallo Excel-Gemeinde
lässt sich untenstehendes Makro auch verkürzen?
Es sind inzwischen über 50 Case's.
Danke für eine Meldung.
Joe
Case "btn01"
Makro01
Exit Sub
Case "btn11"
Makro11
Exit Sub
Case "btn41"
Makro41
Exit Sub
Case "btn51"
Makro51
Exit Sub
Case "btn52"
Makro52
Exit Sub

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

Betreff
Datum
Anwender
Anzeige
AW: Case
30.07.2013 08:21:27
UweD
Hallo
wie unterscheiden sich den die Makros 01, 11, 41....
Evtl. kann man die ja anpassen und EIN Unterprogramm mit Parameterübergabe aufrufen..
Gruß UweD

AW: Case
30.07.2013 09:17:16
Luschi
Hallo Joe,
ja, das funktioniert so:

Sub MakroStart()
Dim makro As String, i As Integer
For i = 1 To 2
makro = "Makro" & Format(i, "00")
Application.Run makro
Next i
End Sub
Sub Makro01()
MsgBox "Ich bin Makro01!"
End Sub
Sub Makro02()
MsgBox "Ich bin Makro02!"
End Sub
Gruß von Luschi
aus klein-Paris

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige