ich beschrifte Buttons (2. Ebene) in Abhängigkeit von der Auswahl der Buttons (1.Ebene)
bisherige Lösung:
...
x1 = Range("VU")
v1 = "True"
x2 = Range("BE")
v2 = "True"
SF1.Caption = x1
SF1.Visible = v1
SF2.Caption = x2
SF2.Visible = v2
...
Da diese Beschrifterei immer wieder vorkommt, möchte ich gerne eine öffentlche Funktion (?!?), die ich nur einmal anlegen muss, sollte dann so aussehen:
im Code der jeweiligen Buttons werden die Variablen befüllt
...
x1 = Range("VU")
v1 = "True"
x2 = Range("BE")
v2 = "True"
ButtonBeschriften 'Funktion zum Beschriften der Buttons
...
Sub ButtonBeschriften()
SF1.Caption = x1
SF1.Visible = v1
SF2.Caption = x2
SF2.Visible = v2
End Sub
Aber irgendwie bekomme ich das mit dem Aufruf nicht hin.
Wer kann helfen - schon mal besten Dank!
LG Mike