Per VBA Code Verweis im VBA-Editor in Excel kontrollieren und ggf. hinzufügen

ThisWorkbook.VBProject.References

Dim ref As VBIDE.Reference
    Set ref = ThisWorkbook.VBProject.References.Item("XYZ")  

Dim ref As VBIDE.Reference
    Set ref = ThisWorkbook.VBProject.References.Item("XYZ").IsBroken  

On Error GoTo ErrHandler
  Dim ref As VBIDE.Reference
  Dim XYZISINREFERENCES As Boolean
  Dim RefPathXYZ As String
  XYZISINREFERENCES = False

    For Each ref In ThisWorkbook.VBProject.References
      Select Case ref.Name 'Besser wäre anhand der GUID zu prüfen  
        Case "XYZ"  
          XYZISINREFERENCES = True
          If ref.IsBroken Then
            RefPathXYZ = "Pfad zu Deiner Komponente"  
            'Besser vorher prüfen ob COM auf Computer, ggfls. installieren/registrieren  
              'Am besten in Funktion auslagern  
            ThisWorkbook.VBProject.References.AddFromFile FullPath
          End If
      End Select
    Next ref
    
    If Not XYZISINREFERENCES Then
      'Referenz war überhaupt nicht gesetzt  
        'Besser vorher prüfen ob COM auf Computer, ggfls. installieren/registrieren  
          'Am besten in Funktion auslagern (s.o.)  
      ThisWorkbook.VBProject.References.AddFromFile RefPathXYZ
    End If
ErrHandler:
  Select Case Err.Number
    Case 0 'Erfolgreich  
    Case 47 'Fehler beim laden einer DLL(Versuch Referenz hinzuzufügen)  
      'Installieren/registrieren und in Projekt hinzufügen (am besten auch in Funktion ausgelagert)  
    Case Else
      'Standard Error Handler aufrufen bzw. auf Fehler lokal reagieren  
  End Select