Makros in Schleife aufrufen
22.02.2015 15:53:13
Franz W.
Hallo Fachleute,
lassen sich mehrere Makros der Reihe nach in einer Schleife aufrufen?
Es gibt z. B. folgende Makros:
Sub auflisten_7(mcz)
Cells(6, mcz).Select
End Sub
Sub auflisten_17(mcz)
Cells(6, mcz).Select
End Sub
Sub auflisten_27(mcz)
Cells(6, mcz).Select
End Sub
Nun den Aufruf aus einer Schleife:
Sub alle_auflisten()
Dim mcz As Byte
For mcz = 7 To 87 Step 10
Call auflisten_ & mcz(mcz)
Stop
Next
End Sub
So geht es natürlich nicht. Gibt es eine Lösung dafür oder geht das so überhaupt nicht?
Danke schonmal und Grüße
Franz
Anzeige