Public Sub VerweisHinzufügenGUID(strGUID As String, lngMaj As Long, lngMin As _
  Long)
    Application.VBE.ActiveVBProject.References.AddFromGuid strGUID, lngMaj, _
    lngMin
End Sub

Mit freundlichen Gr??en
DotNetErbse


[Es hei?t Paket und nicht Packet, auch wenn Standard augenscheinlich von Standar(t)e kommt,hei?t es dennoch Standar(d)]