fEHLERMELDUNG

WER KANN MIR SAGEN ,WAS DIE fehlermeldung"424" bedeutet?

ich kanns dir sagen...
aba nächstes mal bitte etwa höfflicher... :wink:

Microsoft sagt dazu:

Zitat

Problembeschreibung
Wenn Sie versuchen, in Microsoft Visio eine benutzerdefinierte Befehlsschaltfläche zu verwenden, wird möglicherweise die folgende Fehlermeldung angezeigt (sinngemäß):
Laufzeitfehler '424'

Objekt benötigt.
Ursache
Dieses Problem kann auftreten, wenn die Verweise auf die Schaltfläche nicht mehr gültig sind, da der Menükontext auf ein anderes Dokument umgestellt wurde.
Lösung
Die Verwendung der hier aufgeführten Information, Makro- oder Programmcodes geschieht auf Ihre eigene Verantwortung. Microsoft stellt Ihnen diese Informationen sowie Makro- und Programmlistings ohne Gewähr auf Richtigkeit, Vollständigkeit und/oder Funktionalität sowie ohne Anspruch auf Support zur Verfügung. Die zur Verfügung gestellten Makro- und Programmierungsbeispiele sollen lediglich exemplarisch die Funktionsweise des Beispiels aufzeigen.

http://support.microsoft.com/d…x?scid=fh;DE;PHONENUMBERS
Stellen Sie den Verweis auf die Schaltfläche vor jeder Verwendung wieder her, um dieses Problem zu beheben. Verwenden Sie hierzu folgendes Makro:

Public Sub DoTest()

Dim cb As Office.CommandBar
On Error Resume Next
Set cb = Application.CommandBars("Context Switch Test")
cb.Delete
Set cb = Nothing
On Error GoTo 0

Set cb = Application.CommandBars.Add("Context Switch Test")
cb.Visible = True

Dim cbc As Office.CommandBarControl
Set cbc = cb.Controls.Add(msoControlButton)

cbc.Tag = "xxx"
cbc.Caption = "Hi There"

Application.CommandBars("Context Switch Test").Controls(1).Tag = "xxx"
MsgBox (Application.CommandBars("Context Switch Test").Controls(1).Tag)
MsgBox cbc.Caption

End Sub

Status
Microsoft hat bestätigt, dass es sich hierbei um ein Problem bei den in diesem Artikel genannten Microsoft-Produkten handelt.
Die Informationen in diesem Artikel beziehen sich auf:

* Microsoft Visio 2002 Standard
* Microsoft Visio 2002 Professional
* Microsoft Visual Basic für Applikationen

Alles anzeigen

gruss...

franky...