Moin!
Ich möchte in Word eine Button einbauen der dann per .OnAction
ein Makro startet, nun hab ich nur das Problem das ich mehrere
Buttons habe und für alle ein allgemeines Makro bauen will.
Deswegen müsste ich einen Parameter übergeben
With UMenu_1.Controls.Add(Type:=msoControlButton)
.Caption = "Button1"
.OnAction = "SubUMenu"
End With
...
Sub SubUMenu(strText as String)
MsgBox (StrText) '--Beispiel--
End Sub
so provoziere ich aber nur eine Fehlermeldung - Argument ist nicht
optional - und wenn ich dann strText als optional angebe bekomme
ich eine leere MsgBox
nun hab ich schon .OnAction = "'SubUMenu""hallo welt""'"
und auch schon so manch anderes Konstrukt versucht ...