Weitere Menüpunkte löschen
02.02.2005 22:42:26
HeinzH
Habe ein Makro gefunden um Menüpunkte nicht anzuzeigen.Bei Delete "Format" funktionierts bei Delete "Extras" nicht.Könnte mir bitte jemand erklären wo der Fehler liegt.
Danke Heinz
Option Explicit
Sub EditCmdBar()
On Error GoTo ERRORHANDLER
.Controls("Daten").Caption = "Da&ten"
.Controls("Format").Delete
.Controls("Extras").Delete
End With
Exit Sub
ERRORHANDLER:
MsgBox "Ein Element wurde nicht gefunden!"
End Sub