Office: Makro Fehlermeldung "Laufzeitfehler 429"

Nach dem Update von 2003 auf 2007 kommen bei Aufruf der gespeicherten Makros (von Version 2003) folgende Fehlermeldung:

Laufzeitfehler "429"
Objekterstellung durch ActiveX-Komponente nicht möglich

Wenn ich dann VB öffne markiert er mir folgende Zeile im Editor:
Set myOLItem = myOLApp.CreateItem(olMailItem)

Hier der vollständige Text:
---------------------------------------------------------------------
Sub EDI()
Dim myOLApp As New Outlook.Application
Dim myOLItem As Outlook.MailItem
Set myOLItem = myOLApp.CreateItem(olMailItem)
With myOLItem
.To = "shared01@c.crossgate.com"
.Subject = ""
.Attachments.Add "V:\Bestellung.txt"
.Body = ""
.Send
End With
Set objOLItem = Nothing
End Sub
-----------------------------------------------------

Wie kann ich den Fehler beheben?

 

Hallo,

kann es sein, dass Du das Makro "Sub EDI()" nicht aus Outlook heraus aufrufst, sondern zB. aus Excel, Word, Access, ... ?
Wenn dem so sein sollte, dann
1) gehe aus dem Excel-Arbeitsblatt (bzw. aus dem Word-Dokument, ...) mit der Tastenkombination Alt+F11 in den VBA-Editor
2) Im Menü des VBA-Editors wähle Extras > Verweise, sodass das Dialogfenster für "Verweise - VBAProject" sichtbar wird
3) Dort scrollst Du in der Liste "Verfügbare Verweise" solange hinunter, bis Du den Eintrag "Microsoft Outlook .... Object Library" findest (An der Stelle der Punkte steht eine Versionsnummer zB. 12.0 oder 14.0)
4) Die Checkbox vor diesem Listeneintrag dann anhaken.
5) Mit Ok-Button das Fenster schließen
6) Mit der Tastenkombination Alt+F11 den VBA-Editor schließen, um wieder ins Hauptdokument (von Excel, Word, Access, ...) zurückzukehren.
7) Die Datei natürlich speichern.

Es kann aber auch sein, dass Du unter Punkt 3) in der Liste der "Verfügbare Verweise" einen merkwürdigen Eintrag in Blockschrift vorfindest, der so ähnlich lautet wie "NICHT VORHANDENER ....". Dann musst Du das Häkchen vor diesem Eintrag entfernen und wie beschrieben ab Punkt 3) fortfahren.

Der Hintergrund ist der, dass das jeweils andere Office-Programm einen Verweis auf eine vorhandene Outlook-Programmbibliothek benötigt, um die verwendeten VBA-Makroanweisungen auszuführen. Das einzelne Officeprodukt stellt zwar automatisch ein paar Bibliotheken zur Verfügung, damit es jeweils für den eigenen Anwendungsbereich funktioniert (zB. in Excel die Excel-Library oder in Word die Word-Library). Will man aber per Makro in ein anderes Office-Produkt hinübergrasen, muss man dessen Library explizit einbinden - oder aber man bindet diese Objekte mittels "Late-Binding" durch 'CreateObject("Outlook.Application")' ein, was den Nachteil hat, dass die Programmierung solcher Makros entschieden an Komfort einbüßt.

Oder falls das obige Prozedere nichts bringt, hat Microsoft im folgenden Link mögliche weitere Schritte zusammengestellt: http://support.microsoft.com/kb/828550/de