Copier/coller des colonnes de 2 fichiers

Bonjour,
voilà mon problème est que je voudrais copier des colonnes d'un fichier A vers un fichier B mais avec quelques particularité :
- les colonnes ne correspondent pas
- il faudrait sélectionner juste les lignes où il y a des données dans le fichier source
-les copier à la suite du fichier de sortie car c'est un document dans lequel je vais rajouter de la même façon beaucoup de données

Après mes recherches sur internet j'ai réussi à avancer mais maintenant je n'arrive pas à modifier correctement la macro pour répondre à toutes les exigences du problème

"Sub CopierDonnees()

Dim Entree As Workbook, Sortie As Workbook

Nomfichierentree = Application.GetOpenFilename("Fichier Excel (*.xlsx), *.xslx")
' On verifie que l'on a selectionné un nom de classeur
If Nomfichierentree <> False Then
' On ouvre le classeur
Set Entree = Workbooks.Open(Nomfichierentree)


NomFichierSortie = Application.GetOpenFilename("Fichier Excel (*.xlsx), *.xslx")
If NomFichierSortie <> False Then
Set Sortie = Workbooks.Open(NomFichierSortie)


Sortie.Worksheets("Feuil1").Cells(1, 1) = Entree.Worksheets("Feuil1").Cells(1, 4)
Sortie.Worksheets("Feuil1").Cells(1, 2) = Entree.Worksheets("Feuil1").Cells(1, 5)
'
' .
' .
' .

' On ferme le classeur
Sortie.Close


End If
' On ferme le second
Entree.Close
End If


End Sub"

Donc voilà le début de ce que j'ai, pouvez vous me donner un coup de main svp

Merci d'avance

Sapin