Copier coller entre 2 fichiers

Bonjour à tous,

j'ai un problème avec mon code et je ne sais pas comment faire, pas très doué en vba je regarde pas mal de forum et de tuto pour me dépatouiller mais la je bloque.

j'ai 2 fichiers, "facture2" et "dépots2'

je voudrais copier la dernière ligne de mon tableau dans "Facture2" et la coller dans un nouveau tableau dans "Dépots2". sauf que je voudrai la coller dans une feuille bien spécifique de mon fichier.

j'ai donc créé un userform avec une combobox qui reprend le nom de toute mes feuilles afin de choisir ou coller la ligne.

la ou je bloque c'est que je n'arrive pas a coller ma ligne, toujours une ligne d'erreur

voici les codes que j'ai ecris

dans "Facture2"

If Sheets("Commande").Range("b80").Value = 1 Then
    Sheets("Facturation").Rows(ligPlein).Copy
    Workbooks.Open ("C:\Users\JMD\Desktop\Dépots2.xlsm")  
    Application.Run "Dépots2.xlsm!Feuilles"        'lancement macro

End if

Dans "Depots2"

Private Sub UserForm_Initialize()
   For Each Ctrl In Me.Controls
       Select Case Left(Ctrl.Name, 3)
            Case "Com"
               Ctrl.BackColor = &HC0FFFF
               Ctrl.ForeColor = RGB(0, 0, 0)
               Ctrl.TextAlign = 1
               Ctrl.Font.Name = "times new roman"
               Ctrl.Font.Size = 14
               Ctrl.Font.Bold = True
               Ctrl.Height = 25
       End Select
   Next Ctrl

End Sub

Private Sub UserForm_Activate()
Dim Feuil As Object
ComboBox1.Clear
   For Each Feuil In Worksheets
      If Feuil.Name <> Feuil1.Name Then
            ComboBox1.AddItem Feuil.Name
      End If
   Next
End Sub

Private Sub ComboBox1_Change()
    Sheets(ComboBox1.Value).Select

    Dim ligVide As Long
ligVide = Sheets("ComboBox1.Value").Range("C" &Rows.Count).End(xlUp).Row + 1   'ERREUR A CE NIVEAU LA !!!!
Sheets(ComboBox1.Value).Rows(ligVide).Paste   

    Application.Goto [A1], True
    Unload Me
    

et la macro pour lancer le userform

Sub Feuilles()

    UserForm1.Show 1

End Sub

Merci beaucoup pour votre aide !!!!