J'ai besoin de recopier le format d'un onglet nommé "Modèle" sur des
nouvelles feuilles que j'insère dans un tableau. J'ai donc créé une macro
mais le problème est que je dois à chaque fois la modifier car la macro
exécute toujours sur le même onglet !
Exemple : Onglet 12_2004 que je dois modifier sur la macro en Onglet 13_2004
sinon ma macro exécute sur 12_2004.
Merci de votre aide car il est vrai que je débute sur VBA !!!
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
Philippe.R
Bonsoir Franky, Peut être peux tu publier ici le code de ta macro, ce sera plus facile pour un contributeur de te proposer une adaptation. -- Amicales Salutations Retirer A_S_ pour répondre. XL 97 / 2000 / 2002
"Frankyl1999" a écrit dans le message de news:
Bonjour,
J'ai besoin de recopier le format d'un onglet nommé "Modèle" sur des nouvelles feuilles que j'insère dans un tableau. J'ai donc créé une macro mais le problème est que je dois à chaque fois la modifier car la macro exécute toujours sur le même onglet ! Exemple : Onglet 12_2004 que je dois modifier sur la macro en Onglet 13_2004 sinon ma macro exécute sur 12_2004. Merci de votre aide car il est vrai que je débute sur VBA !!!
Bonsoir Franky,
Peut être peux tu publier ici le code de ta macro, ce sera plus facile pour un contributeur de te
proposer une adaptation.
--
Amicales Salutations
Retirer A_S_ pour répondre.
XL 97 / 2000 / 2002
"Frankyl1999" <frank.lahaye@neuf.fr> a écrit dans le message de
news:ODzjGkPPEHA.2132@TK2MSFTNGP11.phx.gbl...
Bonjour,
J'ai besoin de recopier le format d'un onglet nommé "Modèle" sur des
nouvelles feuilles que j'insère dans un tableau. J'ai donc créé une macro
mais le problème est que je dois à chaque fois la modifier car la macro
exécute toujours sur le même onglet !
Exemple : Onglet 12_2004 que je dois modifier sur la macro en Onglet 13_2004
sinon ma macro exécute sur 12_2004.
Merci de votre aide car il est vrai que je débute sur VBA !!!
Bonsoir Franky, Peut être peux tu publier ici le code de ta macro, ce sera plus facile pour un contributeur de te proposer une adaptation. -- Amicales Salutations Retirer A_S_ pour répondre. XL 97 / 2000 / 2002
"Frankyl1999" a écrit dans le message de news:
Bonjour,
J'ai besoin de recopier le format d'un onglet nommé "Modèle" sur des nouvelles feuilles que j'insère dans un tableau. J'ai donc créé une macro mais le problème est que je dois à chaque fois la modifier car la macro exécute toujours sur le même onglet ! Exemple : Onglet 12_2004 que je dois modifier sur la macro en Onglet 13_2004 sinon ma macro exécute sur 12_2004. Merci de votre aide car il est vrai que je débute sur VBA !!!
Frankyl1999
Voila la macro que j'utilise et que je voudrai modifier !
Sub Macro1() Sheets("Modèle").Select Cells.Select Selection.Copy Sheets("12_2004").Select Cells.Select Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _ SkipBlanks:úlse, Transpose:úlse Application.CutCopyMode = False Range("A1").Select End Sub
"Frankyl1999" a écrit dans le message de news:
Bonjour,
J'ai besoin de recopier le format d'un onglet nommé "Modèle" sur des nouvelles feuilles que j'insère dans un tableau. J'ai donc créé une macro mais le problème est que je dois à chaque fois la modifier car la macro exécute toujours sur le même onglet ! Exemple : Onglet 12_2004 que je dois modifier sur la macro en Onglet 13_2004
sinon ma macro exécute sur 12_2004. Merci de votre aide car il est vrai que je débute sur VBA !!!
Voila la macro que j'utilise et que je voudrai modifier !
Sub Macro1()
Sheets("Modèle").Select
Cells.Select
Selection.Copy
Sheets("12_2004").Select
Cells.Select
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:úlse, Transpose:úlse
Application.CutCopyMode = False
Range("A1").Select
End Sub
"Frankyl1999" <frank.lahaye@neuf.fr> a écrit dans le message de
news:ODzjGkPPEHA.2132@TK2MSFTNGP11.phx.gbl...
Bonjour,
J'ai besoin de recopier le format d'un onglet nommé "Modèle" sur des
nouvelles feuilles que j'insère dans un tableau. J'ai donc créé une macro
mais le problème est que je dois à chaque fois la modifier car la macro
exécute toujours sur le même onglet !
Exemple : Onglet 12_2004 que je dois modifier sur la macro en Onglet
13_2004
sinon ma macro exécute sur 12_2004.
Merci de votre aide car il est vrai que je débute sur VBA !!!
Voila la macro que j'utilise et que je voudrai modifier !
Sub Macro1() Sheets("Modèle").Select Cells.Select Selection.Copy Sheets("12_2004").Select Cells.Select Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _ SkipBlanks:úlse, Transpose:úlse Application.CutCopyMode = False Range("A1").Select End Sub
"Frankyl1999" a écrit dans le message de news:
Bonjour,
J'ai besoin de recopier le format d'un onglet nommé "Modèle" sur des nouvelles feuilles que j'insère dans un tableau. J'ai donc créé une macro mais le problème est que je dois à chaque fois la modifier car la macro exécute toujours sur le même onglet ! Exemple : Onglet 12_2004 que je dois modifier sur la macro en Onglet 13_2004
sinon ma macro exécute sur 12_2004. Merci de votre aide car il est vrai que je débute sur VBA !!!
Philippe.R
Bonjour, En supposant que le classeur ne comporte que les feuilles nommées "x_2004" en plus de la feuille modèle et que la feuille ajoutée soit la dernière.
Sub Macro1bis() i = ThisWorkbook.Sheets.Count-1 Sheets("Modèle").Select Cells.Select Selection.Copy Sheets(i).Select Cells.Select Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _ SkipBlanks:úlse, Transpose:úlse Application.CutCopyMode = False Range("A1").Select End Sub
devrait convenir -- Amicales Salutations Retirer A_S_ pour répondre. XL 97 / 2000 / 2002 Pour suivre le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Frankyl1999" a écrit dans le message de news:
Voila la macro que j'utilise et que je voudrai modifier !
Sub Macro1() Sheets("Modèle").Select Cells.Select Selection.Copy Sheets("12_2004").Select Cells.Select Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _ SkipBlanks:úlse, Transpose:úlse Application.CutCopyMode = False Range("A1").Select End Sub
"Frankyl1999" a écrit dans le message de news:
Bonjour,
J'ai besoin de recopier le format d'un onglet nommé "Modèle" sur des nouvelles feuilles que j'insère dans un tableau. J'ai donc créé une macro mais le problème est que je dois à chaque fois la modifier car la macro exécute toujours sur le même onglet ! Exemple : Onglet 12_2004 que je dois modifier sur la macro en Onglet 13_2004
sinon ma macro exécute sur 12_2004. Merci de votre aide car il est vrai que je débute sur VBA !!!
Bonjour,
En supposant que le classeur ne comporte que les feuilles nommées "x_2004" en plus de la feuille modèle
et que la feuille ajoutée soit la dernière.
Sub Macro1bis()
i = ThisWorkbook.Sheets.Count-1
Sheets("Modèle").Select
Cells.Select
Selection.Copy
Sheets(i).Select
Cells.Select
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:úlse, Transpose:úlse
Application.CutCopyMode = False
Range("A1").Select
End Sub
devrait convenir
--
Amicales Salutations
Retirer A_S_ pour répondre.
XL 97 / 2000 / 2002
Pour suivre le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Frankyl1999" <frank.lahaye@neuf.fr> a écrit dans le message de
news:u8CdArVPEHA.3100@TK2MSFTNGP10.phx.gbl...
Voila la macro que j'utilise et que je voudrai modifier !
Sub Macro1()
Sheets("Modèle").Select
Cells.Select
Selection.Copy
Sheets("12_2004").Select
Cells.Select
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:úlse, Transpose:úlse
Application.CutCopyMode = False
Range("A1").Select
End Sub
"Frankyl1999" <frank.lahaye@neuf.fr> a écrit dans le message de
news:ODzjGkPPEHA.2132@TK2MSFTNGP11.phx.gbl...
Bonjour,
J'ai besoin de recopier le format d'un onglet nommé "Modèle" sur des
nouvelles feuilles que j'insère dans un tableau. J'ai donc créé une macro
mais le problème est que je dois à chaque fois la modifier car la macro
exécute toujours sur le même onglet !
Exemple : Onglet 12_2004 que je dois modifier sur la macro en Onglet
13_2004
sinon ma macro exécute sur 12_2004.
Merci de votre aide car il est vrai que je débute sur VBA !!!
Bonjour, En supposant que le classeur ne comporte que les feuilles nommées "x_2004" en plus de la feuille modèle et que la feuille ajoutée soit la dernière.
Sub Macro1bis() i = ThisWorkbook.Sheets.Count-1 Sheets("Modèle").Select Cells.Select Selection.Copy Sheets(i).Select Cells.Select Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _ SkipBlanks:úlse, Transpose:úlse Application.CutCopyMode = False Range("A1").Select End Sub
devrait convenir -- Amicales Salutations Retirer A_S_ pour répondre. XL 97 / 2000 / 2002 Pour suivre le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Frankyl1999" a écrit dans le message de news:
Voila la macro que j'utilise et que je voudrai modifier !
Sub Macro1() Sheets("Modèle").Select Cells.Select Selection.Copy Sheets("12_2004").Select Cells.Select Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _ SkipBlanks:úlse, Transpose:úlse Application.CutCopyMode = False Range("A1").Select End Sub
"Frankyl1999" a écrit dans le message de news:
Bonjour,
J'ai besoin de recopier le format d'un onglet nommé "Modèle" sur des nouvelles feuilles que j'insère dans un tableau. J'ai donc créé une macro mais le problème est que je dois à chaque fois la modifier car la macro exécute toujours sur le même onglet ! Exemple : Onglet 12_2004 que je dois modifier sur la macro en Onglet 13_2004
sinon ma macro exécute sur 12_2004. Merci de votre aide car il est vrai que je débute sur VBA !!!
