Bonjour,
J'aimerais copier des colonnes suivant leur nom dans une autre feuille Excel.
Exemple:
Nom | Prénom | Age | Ville
Robert | Luis | 45 | Chalons
Villenave | Thierry | 34 | Tours
Babel | Alexis | 26 | Chartres

Je n'aimerais copier que les colonnes Nom et Ville par exemple, et les coller sur la Feuil2, respectivement en colonne A et B simplement.
J'arrive à trouver les colonnes désirées et à inscrire le numéro de la colonne (1,2,3 etc) mais comment faire pour sélectionner la colonne jusqu'à la dernière valeur non vide et la copier pour la coller dans Feuil2??
Mon code:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Sub Macro1()
 
    Cells.Find(What:="Product Type", After:=ActiveCell, LookIn:=xlFormulas, _
        LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
        MatchCase:=False).Activate
    Num_Col = ActiveCell.Column
 
    Columns(Num_Col).Select
End Sub
Merci du coup de pouce par avance!