Créer une copie de la première feuille d'un fichier Excel VBA

Jiand Messages postés 5 Date d'inscription   Statut Membre Dernière intervention   -  
Le Pingou Messages postés 12249 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

J'aimerai créer une Macro avec un bouton de contrôle qui vient sélectionner un Fichier X suivant le script ci dessous :

Dim wb As Workbook, DP As String
DP = Application.GetOpenFilename

Ensuite j'aimerai que la première feuille du fichier sélectionné via ce bouton soit copier et coller dans mon Fichier Excel où la MACRO est crée

Pour l'instant je ne suis qu'à la partie de sélection qui est réussie

Pouvez vous m'aider pour la suite
Je suis plutôt novice en VBA

Merci d'avance
A voir également:

1 réponse

Réponse 1 / 1
Le Pingou Messages postés 12249 Date d'inscription   Statut Contributeur Dernière intervention   1 458
 
Bonjour,
Pour l'instant je ne suis qu'à la partie de sélection qui est réussie

Alors insérer ses 2 lignes d’instruction : 
Windows("Nom Ficier X.xlsx").Activate
Sheets("Feuil1").Copy After:=Workbooks("NomClassseurMacro.xlsm").Sheets(1)
0