habe ein Excelproblen, alle Symbolleisten sind weg, ich kann sie nicht mehr finden, auch nicht unter extras, Anpassen.
kann mir jemand weiter helfen?
gruß
erich
Sub alle_ein()
Dim cb As CommandBar
For Each cb In CommandBars
cb.Enabled = True
Next
CommandBars(1).Visible = True
End Sub