Nicht vorhandene Verweise
30.04.2020 13:21:47
Woppi
hat einer einen Tipp für mich?
Ich schriebe Makros die auf verschiedene Rechner in unserer Firma installiert werden.
Und es gibt jetzt Probleme mit dem Verweisen auf VBAProjekte, wenn die Datein nicht auf den anderen Rechner vorhanden sind, bzw die Software dort auch nicht installiert sein soll.
Ich habe auch schon etwas darüber im Netz gefunden:
https://support.microsoft.com/de-de/help/308340/how-to-check-and-remove-incorrect-project-references-in-the-visual-bas
aber bei allen Code Beispielen die ich gefunden habe,
bekomme ich direkt am Anfang eine Fehlermeldung: (an der "fetten" Zeile, unten im Code)
Benutzerdefinierter Typ nicht definiert
Sub CheckReference()
'Prüft ob es Verweise auf Bibliotheken gibt, die nicht vorhanden sind, und gibt den Namen im _
Direktfenster aus
DimvbProj 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
kann mir einer sagen was ich da Falsch mache?
Gruß Woppi