Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Copie de la feuille active

Copie de la feuille active

3 réponses
Avatar
pedro
Bonjour à Tous

J’ai fait avec l'enregistreur cette Macro qui me permet de copie la feuille
active vers le classeur1 ça marche très bien mais quand je change de feuille
et que j'exécute la macro ça marche pas car elle et adressée à Boîte et
l’autre feuille S’appelle planning comment faire pour que la macro ne tienne
pas conte du nom de la feuille ?

Merci d'avance

Sub ArchiveFeuilles()
Sheets("Boîte").Select
Sheets("Boîte").Copy Before:=Workbooks("Classeur1").Sheets(1)
End Sub
Signaler un problème avec ce contenu

3 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Jacky
Bonsoir
Ceci copie la feuille active, peu importe le nom
'------
Sub ArchiveFeuilles()
ActiveSheet.Copy Before:=Workbooks("Classeur1").Sheets(1)
End Sub
'---------------

--
Salutations
JJ


"pedro" a écrit dans le message de news:

Bonjour à Tous

J'ai fait avec l'enregistreur cette Macro qui me permet de copie la
feuille
active vers le classeur1 ça marche très bien mais quand je change de
feuille
et que j'exécute la macro ça marche pas car elle et adressée à Boîte et
l'autre feuille S'appelle planning comment faire pour que la macro ne
tienne
pas conte du nom de la feuille ?

Merci d'avance

Sub ArchiveFeuilles()
Sheets("Boîte").Select
Sheets("Boîte").Copy Before:=Workbooks("Classeur1").Sheets(1)
End Sub



Avatar
LSteph
Bonsoir,

Sub ArchiveFeuilles()
Activesheet.copy Before:=Workbooks("Classeur1").Sheets(1)
End Sub

--
lSteph

Bonjour à Tous

J’ai fait avec l'enregistreur cette Macro qui me permet de copie la feuille
active vers le classeur1 ça marche très bien mais quand je change de feuille
et que j'exécute la macro ça marche pas car elle et adressée à Boîte et
l’autre feuille S’appelle planning comment faire pour que la macro ne tienne
pas conte du nom de la feuille ?

Merci d'avance

Sub ArchiveFeuilles()
Sheets("Boîte").Select
Sheets("Boîte").Copy Before:=Workbooks("Classeur1").Sheets(1)
End Sub



Avatar
LSteph
ou encore

Sub ArchiveFeuilles()
Activesheet.copy After:¬tiveworkbook.Sheets(sheets.count)
End Sub

--
lSteph