State "Control Toolbox" ändern
10.03.2006 18:12:58
Friederico
Habe mich intensiv umgesehen und viele nützliche Hinweise erhalten. Ich hoffe, ich habe richtig und lange genug gesucht - aber zu meiner Frage habe ich keine Antwort gefunden.
Ich möchte von der "Steuerelemente-Toolbox" per VBA-Code den Status abfragen, und wenn dieser auf "Entwurfsmodus" steht, den Entwurfsmodus beenden.
mein Code:
Sub CheckControl()
on Error goto Fehlerbehandlung:
With Application.CommandBars("Control Toolbox").Controls(1)
If .State = -1 Then
.State = 0
End If
Exit Sub
Fehlerbehandlung:
If Err.Number <> 0 Then
MsgBox Err.Description
End If
End Sub
Ich bekomme die Fehlermeldung:
Die Methode 'State' für das Objekt '_CommandBarButton' ist fehlgeschlagen.
(Die gewünsche Statusänderung wird nicht durchgeführt.)
Kann man für diese spezielle Symbolleiste (Steuerelemente-Toolbox) die Eigenschaft des ersten Controls(=Entworfsmodus) nicht verändern? Oder wie anders muss ich da ran gehen.
Wäre nett, wenn mir jemand helfen könnte.
Gruß
Friederico