VBA copie de feuille de classeur excel
arnd21
Messages postés
11
Statut
Membre
-
arnd21 Messages postés 11 Statut Membre -
arnd21 Messages postés 11 Statut Membre -
Bonjour à tous,
Je souhaite copier une feuille d'un classeur, vers un autre classeur.
J'ai ma 'feuil2' dans classeur1 que je souhaite copier dans classeur2 en tant qu'unique feuille du classeur2. Je sèche un peu beaucoup....comment faire connaitre le chemin de la copie de la feuille 2 etc....j'ai du mal à comprendre les code que je vois sur les forums, car je ne vois vraiment pas ou indiquer le chemin...
merci pour votre aide.
Je souhaite copier une feuille d'un classeur, vers un autre classeur.
J'ai ma 'feuil2' dans classeur1 que je souhaite copier dans classeur2 en tant qu'unique feuille du classeur2. Je sèche un peu beaucoup....comment faire connaitre le chemin de la copie de la feuille 2 etc....j'ai du mal à comprendre les code que je vois sur les forums, car je ne vois vraiment pas ou indiquer le chemin...
merci pour votre aide.
A voir également:
- VBA copie de feuille de classeur excel
- Feuille de pointage excel - Télécharger - Tableur
- Liste déroulante excel - Guide
- Copie cachée - Guide
- Bruler feuille de laurier - Guide
- Word et excel gratuit - Guide
5 réponses
Bonjour,
a la main sur une maquette pour apprendre
Tu fais un clic droit sur le nom de ta feuille à copier puis
puis
Pour le faire en macro:
pour activer les macros sous XL2007
1/ Si l'onglet Développeur n'apparait pas dans le ruban:
Cliquer sur le bouton Office,
puis sur le bouton Options Excel.
Cliquer sur le menu Standard.
Cocher l'option Afficher l'onglet Développeur dans le ruban.
Cliquer sur le bouton OK pour valider.
2/ activer les macros
Cliquer sur le bouton Office,
puis sur le bouton Options Excel.
Cliquer sur centre de gestion de confidentialité
puis sur param^tre du centre de gestion de la confidentialité
puis cocher le bouton radio activer les macros
Cliquerz sur le bouton OK pour valider.
ton Excel est maintenant définitivement prêt à travailler avec des macros
ensuite développeur- enregistrer une macro
tu refais les manips apprises "à la main"
-arrêter l'enregistrement
pour voir le code
Alt+F11- module 1 (si tu ne vois pas les modules: ctrl+R
a la main sur une maquette pour apprendre
Tu fais un clic droit sur le nom de ta feuille à copier puis

puis

Pour le faire en macro:
pour activer les macros sous XL2007
1/ Si l'onglet Développeur n'apparait pas dans le ruban:
Cliquer sur le bouton Office,
puis sur le bouton Options Excel.
Cliquer sur le menu Standard.
Cocher l'option Afficher l'onglet Développeur dans le ruban.
Cliquer sur le bouton OK pour valider.
2/ activer les macros
Cliquer sur le bouton Office,
puis sur le bouton Options Excel.
Cliquer sur centre de gestion de confidentialité
puis sur param^tre du centre de gestion de la confidentialité
puis cocher le bouton radio activer les macros
Cliquerz sur le bouton OK pour valider.
ton Excel est maintenant définitivement prêt à travailler avec des macros
ensuite développeur- enregistrer une macro
tu refais les manips apprises "à la main"
-arrêter l'enregistrement
pour voir le code
Alt+F11- module 1 (si tu ne vois pas les modules: ctrl+R
Merci pour cette réponse effectivement cela fonctionne comme je le veux, mais petite question si je mets le fichier 1 dans un répertoire et le fichier 2 dans un autre comment l'indiquer à la macro? car la quand je fais le mode manuel il ne précise pas de chemin??
Merci par avance
Merci par avance
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Bonsoir,
la copie fonctionne donc correctement, mais je souhaite que la feuille du classeur 2 soit toujours compressé pour être remplacée par la nouvelle enregistrer, dans le cas présent il me recrée une feuille suppléme,taire dans le classeur à chaque fois.
j'ai donc essayé la manipulation suivante:
Sub essaicopie2()
'
' essaicopie2 Macro
'
'
Sheets("Feuil2").Select
Sheets("Feuil2").Copy Before:=Workbooks("essaimacrocopie.xlsx").Sheets(1)
Sheets("à imprimer").Select
ActiveWindow.SelectedSheets.Delete
Sheets("Feuil2").Select
Sheets("Feuil2").Name = "à imprimer"
End Sub
mais quand je lance la macro par la suite il m'indique un bug sur la ligne suivante:
Sheets("Feuil2").Copy Before:=Workbooks("essaimacrocopie.xlsx").Sheets(1)
je ne sais que faire
merci
la copie fonctionne donc correctement, mais je souhaite que la feuille du classeur 2 soit toujours compressé pour être remplacée par la nouvelle enregistrer, dans le cas présent il me recrée une feuille suppléme,taire dans le classeur à chaque fois.
j'ai donc essayé la manipulation suivante:
Sub essaicopie2()
'
' essaicopie2 Macro
'
'
Sheets("Feuil2").Select
Sheets("Feuil2").Copy Before:=Workbooks("essaimacrocopie.xlsx").Sheets(1)
Sheets("à imprimer").Select
ActiveWindow.SelectedSheets.Delete
Sheets("Feuil2").Select
Sheets("Feuil2").Name = "à imprimer"
End Sub
mais quand je lance la macro par la suite il m'indique un bug sur la ligne suivante:
Sheets("Feuil2").Copy Before:=Workbooks("essaimacrocopie.xlsx").Sheets(1)
je ne sais que faire
merci