Makros in Schleife aufrufen

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

Sub alle_auflisten()
Dim mcz As Byte
For mcz = 7 To 87 Step 10
Call auflisten_ & mcz(mcz)
Stop
Next
End Sub