Hi zusammen,
ich kann mit folgendem Code eine Symbolleiste generieren und dem darauf festgelegten Button eine Aktion zuweisen. Schon klasse, aber kann ich auch die Aktionen bereits vorhandener Button (z.B. Drucken auf der Standard-Symbolleiste) durch meine ersetzten?
Set myBar = CommandBars _
.Add(Name:="Drucken", Position:=msoBarTop, _
Temporary:=True)
myBar.Visible = True
Set myControl = myBar.Controls _
.Add(Type:=msoButtonIcon)
With myControl
.FaceId = 4
.OnAction = "drucken"
End With
Weiß jemand Rat?
Gruß Andre