Добавление файлов в элементы с помощью vba excel

Question

У меня есть список оборудования, расположенного в столбце A в моем рабочем листе Excel, я хочу добавить документы к каждому оборудованию (столбец B) с помощью VBA. Я использую userfoms, мой список оборудования отображается в списке, я создал кнопку для добавления связанного файла следующим образом

Private Sub Ajout_Mdp_Equip_Click()
If Me.ListBox_Equip.ListIndex = -1 Then
    MsgBox ("Pour ajouter le mode de preuve veuiller choisir un equipement")
Else

Nom_Equip = Me.ListBox_Equip.List(Me.ListBox_Equip.ListIndex, 0)
fin_liste_equip = ws_Liste_equip1.Range("A65536").End(xlUp).Row
Me.ListBox_Equip.Clear

    Dim Plage As Range
        Set Plage = ws_Liste_equip1.Range("A2:A" & fin_liste_equip)
        Set Trouve = Plage.Cells.Find(what:=Nom_Equip, lookat:=xlWhole)
    If Trouve Is Nothing Then
    MsgBox ("Equipement non trouv?")
    Else

        ws_Liste_equip1.Activate

    repertoire = Application.GetOpenFilename()
    ws_Liste_equip1.Cells(fin_liste_equip + 1, 1) = Nom_Equip
   ws_Liste_equip1.Cells(fin_liste_equip + 1, 2) = repertoire

   End If
   End If

End Sub

Это код, который создает новый элемент с тем же именем выбранное оборудование и добавить выбранный файл, который попадает в мой список дубликатов.