SO WIRD'S GEMACHT: Fehlerhafte Projektverweise mit dem Visual Basic-Editor in Microsoft Word überprüfen und entfernen

Festlegen der Sicherheitsstufe für das Projekt

1. In Microsoft Word zeigen Sie im Menü Extras auf Makro und klicken dann auf Sicherheit, um das Dialogfeld Sicherheit anzeigen zu lassen.
   

2. Auf der Registerkarte Sicherheitsstufe legen Sie die Sicherheitsstufe bitte auf Mittel fest, so dass Sie die Option haben, Ihre Makros zu aktivieren.
   

3. Stellen Sie auf der Registerkarte Vertrauenswürdige Quellen sicher, dass das Kontrollkästchen Zugriff auf Visual Basic-Projekt vertrauen aktiviert ist. Dadurch haben Sie die Möglichkeit, in Ihren Projekten VBA-Code zu verwenden.
   

4. Klicken Sie auf OK.
   

Erstellen des Projektverweises

Sie werden ein Projekt mit einer darin enthaltenen Prozedur erstellen und dann einen Verweis auf dieses Projekt von einem neuen VBA-Projekt aus anlegen.

So erstellen Sie die Bibliotheksdatei:

1. Erstellen Sie ein neues Dokument in Microsoft Word und speichern Sie es dann wie folgt als Vorlage:
   

   1. Klicken Sie im Menü Datei auf Speichern unter, um das Dialogfeld Speichern unter einzublenden.
      

   2. Ändern Sie den Eintrag im Feld Dateiname zu Refme.
      

   3. Ändern Sie den Eintrag unter Dateityp zu Dokumentvorlage (*.dot).
      

   4. Speichern Sie die Vorlage im Ordner "C:\TestFiles" (falls er nicht bereits existiert, müssen Sie diesen Ordner anlegen).
      

2. Zeigen Sie im Menü Extras auf Makro und klicken Sie dann auf Visual Basic-Editor (oder betätigen Sie die Tastenkombination [Alt]+[F11]), um den Visual Basic-Editor zu starten.
   

3. Klicken Sie im Projekt-Explorer auf TemplateProject (Refme). Klicken Sie im Menü Einfügen auf Modul. Dadurch wird dem Projekt ein neues Modul mit dem Namen "Modul 1" hinzugefügt.
   

4. Fügen Sie den folgenden Code in das Codefenster von Modul 1 ein:
   

   Public Sub CallMe()
   
     Msgbox "Hello World!"
   
   End Sub

5. Klicken Sie auf die Sub-Prozedur und dann im Menü Ausführen auf Sub/Benutzerformular ausführen. Jetzt wird die Meldung "Hello World!" angezeigt. Schließen Sie dieses Meldungsfeld.
   

6. Klicken Sie im Menü Ansicht auf Microsoft Word (ALT+F11), um wieder zu Word zu wechseln.
   

7. Speichern und schließen Sie die Vorlagendatei in Word.
   

Gehen Sie folgendermaßen vor, um den Verweis zu erstellen:

1. Erstellen Sie ein neues Dokument in Microsoft Word und speichern Sie es dann unter dem Namen "Myproj.doc" im Ordner "C:\TestFiles".
   

2. Drücken Sie [Alt]+[F11], um den Visual Basic-Editor zu starten. Klicken Sie im Projekt-Explorer auf Projekt (Myproj).
   

3. Erstellen Sie wie folgt einen Verweis auf die Vorlage "Refme":
   

   1. Klicken Sie im Menü Extras auf Verweise.
      

   2. Klicken Sie im Dialogfeld Verweise auf Durchsuchen.
      

   3. Ändern Sie im Dialogfeld Verweis hinzufügen den Eintrag unter Dateityp zu Word-Dokumente (*.doc; *.dot).
      

   4. Im Ordner "C:\TestFiles" markieren Sie bitte die Vorlage Refme.
      

   5. Klicken Sie auf Öffnen, um wieder in das Dialogfeld Verweise zu gelangen.
      

   6. Klicken Sie auf OK, um wieder in den Visual Basic-Editor zu wechseln.
      

4. Im Projekt-Explorer expandieren Sie das Element Projekt (Myproj). Klicken Sie auf Verweise und vergewissern Sie sich, dass es in der Liste der Verweise den Eintrag Verweis auf Refme.dot gibt.
   

5. Klicken Sie im Menü Einfügen auf Modul, um ein neues Modul in das Projekt einzufügen. Schreiben Sie den folgenden Code in das Modul, um die Prozedur "CallMe" aufzurufen:
   

   Public Sub Test()
   
     Call CallMe
   
   End Sub

6. Testen Sie, ob die Prozedur funktioniert, und wechseln Sie dann wieder zurück zu Word.
   

7. Speichern und schließen Sie die Dokumentdatei. Beenden Sie anschließend Word.
   

Programmatische Überprüfung des Projektverweises

Sie werden jetzt absichtlich den Verweis aufheben und dann die Exaktheit Ihres Verweises testen.

Gehen Sie folgendermaßen vor, um den Verweis aufzuheben:

1. Im Windows Explorer (klicken Sie mit der rechten Maustaste auf Start, und klicken Sie danach im Kontextmenü auf Durchsuchen) ändern Sie den Namen der Vorlage "Refme.dot" zu "Refme.old". Klicken Sie dazu mit der rechten Maustaste auf Refme.dot. Klicken Sie nun im Kontextmenü auf Umbenennen. Geben Sie refme.old ein und drücken Sie die [Eingabetaste].
   

2. Wechseln Sie wieder zu Word und öffnen Sie das Dokument "Myproj.doc" erneut.
   

3. Da Ihre Sicherheitsstufe auf Mittel festgelegt ist, werden Sie gefragt, ob Sie die Makros in diesem Dokument aktivieren oder deaktivieren möchten. Klicken Sie auf Makros aktivieren.
   

4. Drücken Sie [Alt]+[F11], um den Visual Basic-Editor zu starten, und führen Sie dann die Prozedur "Test" aus. Klicken Sie auf OK, wenn (sinngemäß) die folgende Fehlermeldung angezeigt wird:
   

   Projekt oder Bibliothek nicht auffindbar.

5. Sie sollten sich im Unterbrechungsmodus befinden (gelbes Band um die Zeile "Sub"). Klicken Sie im Menü Ausführen auf Zurücksetzen, um wieder in den Entwurfsmodus zu gelangen.
   

6. Klicken Sie im Menü Extras auf Verweise, um das Dialogfeld Verweise anzeigen zu lassen. Sie sehen jetzt, dass "Refme.dot" als "fehlend" gekennzeichnet ist.
   

7. Klicken Sie auf Abbrechen, um das Dialogfeld Verweise zu schließen.
   

Gehen Sie folgendermaßen vor, um programmatisch nach fehlenden Verweisen zu suchen:

1. Klicken Sie im Projekt-Explorer auf Projekt (Myproj).
   

2. Klicken Sie im Menü Extras auf Verweise und fügen Sie anschließend einen Verweis auf die Bibliothek "Microsoft Visual Basic für Applikationen Extensibility 5.3" hinzu. Diese Bibliothek enthält Objekte, die sich auf VBA-Projekte beziehen.
   

3. Bevor Sie auf OK klicken, müssen Sie sich vergewissern, dass der neue Verweis oberhalb des "fehlenden" Verweises eingefügt wird. Klicken Sie mehrmals auf den Pfeil, um die Priorität zu ändern, bewegen Sie den neuen Verweis an die Position oberhalb des "fehlenden" Verweises und klicken Sie dann auf OK.
   

4. Erstellen Sie in dem Modul eine neue Sub-Prozedur mit dem Namen "CheckReference" und schreiben Sie dann den folgenden Code:
   

   Sub CheckReference()
   
      Dim vbProj As VBProject ' This refers to your VBA project.
      Dim chkRef As Reference ' A reference.
   
      ' Refer to the activedocument's VBA project.
      Set vbProj = ActiveDocument.VBProject
   
      ' Check through the selected references in the References dialog box.
      For Each chkRef In vbProj.References
   
         ' If the reference is broken, send the name to the Immediate Window.
         If chkRef.IsBroken Then
            Debug.Print chkRef.Name
         End If
   
      Next
   
   End Sub

5. Klicken Sie im Menü Ansicht auf Direktfenster [Strg]+[G], um das Direktfenster zu öffnen.
   

6. Führen Sie die Sub-Prozedur "CheckReference" aus. Name und Speicherort der Datei werden im Direktfenster angezeigt.
   

Projektverweis entfernen und wiederherstellen

Dieser Abschnitt beschreibt, wie Sie einen Verweis programmatisch entfernen und wiederherstellen können.

Gehen Sie folgendermaßen vor, um einen "fehlenden" Verweis zu entfernen:

1. Ändern Sie in der Sub-Prozedur "CheckReference" die Anweisung Debug.Print wie nachstehend beschrieben. Dadurch werden etwaige fehlende Verweise aus Ihrem Projekt entfernt:
   

      vbProj.References.Remove chkRef

2. Führen Sie die Sub-Prozedur "CheckReference" aus.
   

3. Vergewissern Sie sich, dass der Verweis aus dem Dialogfeld Verweise entfernt wurde (klicken Sie im Menü Extras auf Verweise, um dieses Dialogfeld anzeigen zu lassen).
   

Gehen Sie folgendermaßen vor, um einen Verweis wiederherzustellen (hinzuzufügen):

1. Im Windows-Explorer ändern Sie den Namen von "Refme.old" wieder zu "Refme.dot".
   

2. Wechseln Sie wieder in das Projekt "Myproj" im Visual Basic-Editor von Word.
   

3. Schreiben Sie die folgende Sub-Prozedur mit dem Namen "AddReference":
   

   Sub AddReference()
   
      Dim vbProj as VBProject
   
      Set vbProj = ActiveDocument.VBProject
      vbProj.References.AddFromFile "C:\TestFiles\Refme.dot"
   
   End Sub

4. Führen Sie die Sub-Prozedur "AddReference" aus.
   

5. Vergewissern Sie sich, dass der Verweis auf "Refme.dot" wiederhergestellt wurde. Sie können die Verweise entweder im Projekt-Explorer einsehen oder dazu im Menü Extras auf Verweise klicken.
   

Problembehandlung

• Falls Sie einen Verweis auf eine zu einer bestimmten Anwendung gehörende Datei machen, sollten Sie die native Dateinamenerweiterung für diese Anwendung beibehalten. Andernfalls können bei der Verwendung des Verweises Probleme auftreten. Sie können diese Probleme reproduzieren, indem Sie in dem vorstehenden Beispiel einen Verweis auf die Datei "Refme.old" statt auf die Datei "Refme.dot" anlegen.
  

• Falls Sie mit einer registrierten Komponente arbeiten, können Sie einen GUID-Verweis auf Ihr Projekt hinzufügen. Verwenden Sie dazu die Methode AddFromGUID.
  

Bitte beachten Sie: Bei diesem Artikel handelt es sich um eine Übersetzung aus dem Englischen. Es ist möglich, dass nachträgliche Änderungen bzw. Ergänzungen im englischen Originalartikel in dieser Übersetzung nicht berücksichtigt sind. Die in diesem Artikel enthaltenen Informationen basieren auf der/den englischsprachigen Produktversion(en). Die Richtigkeit dieser Informationen in Zusammenhang mit anderssprachigen Produktversionen wurde im Rahmen dieser Übersetzung nicht getestet. Microsoft stellt diese Informationen ohne Gewähr für Richtigkeit bzw. Funktionalität zur Verfügung und übernimmt auch keine Gewährleistung bezüglich der Vollständigkeit oder Richtigkeit der Übersetzung.