Get a list of installed References

[AlexanderBB]

I'd like to get list of references in use, so if any are missing I can advise the user.

Is there any way of doing this (without needing a reference that may be missing) ?

 

[VBA Geek]

Sub ListReferences()
Dim vbRef  As Object, X As Long
X = 1
Range("A1:E1").Value = Array("NAME", "DESCRIPTION", "GUID", "IS MISSING?", "FULL PATH")
For Each vbRef In ThisWorkbook.VBProject.References
    Range("A1").Offset(X, 0).Value = vbRef.Name
    Range("A1").Offset(X, 1).Value = vbRef.Description
    Range("A1").Offset(X, 2).Value = vbRef.GUID
    Range("A1").Offset(X, 3).Value = vbRef.IsBroken
    Range("A1").Offset(X, 4).Value = vbRef.FullPath
    X = X + 1
Next vbRef
End Sub

 

[AlexanderBB]

Thanks for that, but can you modify it for Access? I had a go but the line with "ThisWorkbook" foiled me.