Zur Verdeutlichung, ich will eigentlich mit dem Macro (wenn es denn geht) die Schaltfläche Ein- bzw. Ausschalten.
Ganz banal (Funktioniert natürlich nicht!) auf diese weise...
Sub AutoExec()
Dim RibUI As Office.IRibbonControl
Dim onoff As String
RibUI = "Kunden" 'ID aus der XML
onoff = "2"
If onoff = "1" Then
RibUI.visible = True
Else
RibUI.visible = False
End If
End Sub
|