Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2016 Macro sut toutes pages

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

ChantalTreize

XLDnaute Occasionnel
Bonjour tout le monde,
J'ai créer cette macro:
Sub copie2()
'
' copie2 Macro
'
' Touche de raccourci du clavier: Ctrl+i
'
Sheets("Feuil2").Select
Cells.Select
Application.CutCopyMode = False
Selection.Copy
Sheets("Feuil5").Select
ActiveSheet.Paste
Range("A1").Select
End Sub

J'ai mis la copie page 5 mais je voudrais pouvoir la recopier sur une page active autre que la 5 si je suis par exemple en feuil 7 ou 10 autre
Suis je assez claire ?
Merci pour votre aide
Chantal
 
Bonjour.
Essayez :
VB:
Sub copie2()
Sheets("Feuil2").Cells.Copy Activesheet.[A1]
End Sub
Si le code est dans le même classeur que les données et si Feuil2 est aussi le nom de l'objet Worksheet qui représente la feuille "Feuil2" vous pouvez aussi l'écrire comme ça :
VB:
Sub copie2()
Feuil2.Cells.Copy Activesheet.[A1]
End Sub
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
11
Affichages
718
Réponses
2
Affichages
583
Réponses
7
Affichages
1 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…