Code für 10 Schaltflächen gleich...
Christoph
In einer UF habe ich mehrere CommandButtons, die immer wieder das gleiche Makro mit unterschiedlichem Parameter starten. Der Parameter ist identisch mit der Nummer der Schaltfläche.
einfaches Bsp:
Private Sub CommandButton21_Click()
Call Makro 21
End Sub
Private Sub CommandButton22_Click()
Call Makro 22
End Sub
usw.
Sub Makro(I as Integer)
MsgBox I
End Sub
Meine Frage:
Kann man für diese 10 Schaltflächen ein Makro erzeugen, anstatt 10 mal das gleiche mit unterschiedlicher Übergabe?
Und wenn ja, wie geht das?
schon vorab vielen Dank
viele Grüße
Christoph
Anzeige