Aktuelle Seite:
/vba/vbeverweise.htm
Letzte Änderung: 24.06.2006

Getestet unter Word97Getestet unter Word2000  
Beispiel anzeigen
Makro/Datei speichern
Print

Häufig möchte man wissen, welche Verweise in einem Projekt verwendet werden.
Z.B. wenn ein Makro auf einem anderen Rechner nicht funktioniert und Fehlermeldungen zurückliefert. Mit folgendem kleinen Makro wird für das aktuelle Projekt ActiveVBPRoject die Beschreibung der Verweise nacheinander in einer MessageBox ausgegeben.

1    Sub VBEVerweise()
2    For i = 1 To VBE.ActiveVBProject.References.Count
3        msg = msg & VBE.ActiveVBProject.References.Item(i).Description & vbCrLf 
4    Next i
5    antw = MsgBox(msg, vbInformation, "Auflistung der Verweise")
6    End Sub 

 www.chf-online.de/vba/vbeverweise.htm © 2001-11 Christian Freßdorf (Zaphod-Systems)