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

Fermé
Jiand Messages postés 5 Date d'inscription lundi 11 janvier 2016 Statut Membre Dernière intervention 4 mars 2016 - 4 mars 2016 à 16:24
Le Pingou Messages postés 12035 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 1 avril 2024 - 4 mars 2016 à 17:14
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

Le Pingou Messages postés 12035 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 1 avril 2024 1 425
4 mars 2016 à 17:14
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