Erreur de compilation : type défini par l'utilisateur non défini

Bonjour !

J'ai un code de user forme qui permet de modifier dans un module une certaine valeur. Cependant à l'exécution de la macro, excel me fait remplir le userform correctement et quand je valide "erreur de compilation" avec la première ligne Dim en surligné :

Private Sub CommandButton1_Click()

Dim VBComp As VBComponent
Dim Anciene_Adresse As String, Nouvelle_Adresse As String, Recherche As String
Dim i As Integer

If TextBox2 = "" Then
  MsgBox "Entrer l'adresse du nouveau serveur", vbInformation, "Attention:"
  Exit Sub
End If

Anciene_Adresse = TextBox1.Text
Nouvelle_Adresse = TextBox2.Text

Set VBComp = ActiveWorkbook.VBProject.VBComponents("Module2")

With VBComp
   For i = 1 To .CodeModule.CountOfLines
      Recherche = .CodeModule.Lines(i, 1)
      Recherche = Replace(Recherche, Anciene_Adresse, Nouvelle_Adresse)
      .CodeModule.ReplaceLine i, Recherche
   Next
End With

Sheets("Disponibilités").Range("K2") = TextBox2.Text
Unload Me

End Sub

Merci de votre aide éventuelle !

Bonjour

Je ne connais pas le type de variable "VBAComponent" et apparemment, VBA non plus !

Remplace le pa r "Variant" et fais l'essai :

Dim VBComp as Variant

Bye !

Je me sens un peu débile !

Merci beaucoup ça fonctionne parfaitement !