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
Alain CROS
Bonjour.
Peut être en utilisant les macros XL4. Sélectioner la zone à recopier de la Feuil1 puis lancer la macro.
Sub RecopierMiseEnPageVersLeGroupe() With Application .ExecuteExcel4Macro ("WORKBOOK.SELECT({""Feuil1"";""Feuil2"";""Feuil3""})") .ExecuteExcel4Macro ("FILL.GROUP(1)") .ExecuteExcel4Macro ("WORKBOOK.SELECT(""Feuil1"")") End With End Sub
Alain CROS
"Patrick Bastard" <bastardp"chez"free.fr> a écrit dans le message de news: #WQhtM#
Bonjour, toutes et tous.
Bien qu'ayant cherché sur Excelabo, sur les divers liens que le site de misange propose, sur la FAQ et sur GOOGLE, je n'ai pas trouvé :
Je souhaite recopier la mise en forme et les infos (formules ou constantes) d'une feuille 1, mise en page par mes soins, sur les feuilles 2 à 32.
Sur les classeurs Excel4, il existait "recopier vers le groupe".
Même en sélectionnant tous les onglets et en copiant / collant, ça ne le fait pas.
Y a-t-il un équivalent sur Excel XP, ou une alternative (code VBA)
Merci d'avance pour vos pistes.
-- Bien cordialement, ==================================== > P. Bastard. Pour me contacter, remplacez "Chez" par @ dans l'adresse
Une foule de conseils utiles sur le site de Misange : http://www.excelabo.net
Bonjour.
Peut être en utilisant les macros XL4.
Sélectioner la zone à recopier de la Feuil1 puis lancer la macro.
Sub RecopierMiseEnPageVersLeGroupe()
With Application
.ExecuteExcel4Macro ("WORKBOOK.SELECT({""Feuil1"";""Feuil2"";""Feuil3""})")
.ExecuteExcel4Macro ("FILL.GROUP(1)")
.ExecuteExcel4Macro ("WORKBOOK.SELECT(""Feuil1"")")
End With
End Sub
Alain CROS
"Patrick Bastard" <bastardp"chez"free.fr> a écrit dans le message de news: #WQhtM#aEHA.996@TK2MSFTNGP12.phx.gbl...
Bonjour, toutes et tous.
Bien qu'ayant cherché sur Excelabo, sur les divers liens que le site de
misange propose, sur la FAQ et sur GOOGLE, je n'ai pas trouvé :
Je souhaite recopier la mise en forme et les infos (formules ou constantes)
d'une feuille 1, mise en page par mes soins, sur les feuilles 2 à 32.
Sur les classeurs Excel4, il existait "recopier vers le groupe".
Même en sélectionnant tous les onglets et en copiant / collant, ça ne le
fait pas.
Y a-t-il un équivalent sur Excel XP, ou une alternative (code VBA)
Merci d'avance pour vos pistes.
--
Bien cordialement,
==================================== > P. Bastard.
Pour me contacter, remplacez "Chez" par @ dans l'adresse
Une foule de conseils utiles sur le site de Misange :
http://www.excelabo.net
Peut être en utilisant les macros XL4. Sélectioner la zone à recopier de la Feuil1 puis lancer la macro.
Sub RecopierMiseEnPageVersLeGroupe() With Application .ExecuteExcel4Macro ("WORKBOOK.SELECT({""Feuil1"";""Feuil2"";""Feuil3""})") .ExecuteExcel4Macro ("FILL.GROUP(1)") .ExecuteExcel4Macro ("WORKBOOK.SELECT(""Feuil1"")") End With End Sub
Alain CROS
"Patrick Bastard" <bastardp"chez"free.fr> a écrit dans le message de news: #WQhtM#
Bonjour, toutes et tous.
Bien qu'ayant cherché sur Excelabo, sur les divers liens que le site de misange propose, sur la FAQ et sur GOOGLE, je n'ai pas trouvé :
Je souhaite recopier la mise en forme et les infos (formules ou constantes) d'une feuille 1, mise en page par mes soins, sur les feuilles 2 à 32.
Sur les classeurs Excel4, il existait "recopier vers le groupe".
Même en sélectionnant tous les onglets et en copiant / collant, ça ne le fait pas.
Y a-t-il un équivalent sur Excel XP, ou une alternative (code VBA)
Merci d'avance pour vos pistes.
-- Bien cordialement, ==================================== > P. Bastard. Pour me contacter, remplacez "Chez" par @ dans l'adresse
Une foule de conseils utiles sur le site de Misange : http://www.excelabo.net
Patrick Bastard
Merci, *Alain CROS*. *Pour reprendre les termes de ton intervention* -voir en fin de message :
Ton code fonctionne parfaitement, et répond totalement à ma demande.
Qu'il est agréable de voir l'esprit d'entr'aide qui règne sur ce forum...
-- Bien cordialement, ==================================== P. Bastard. Pour me contacter, remplacez "Chez" par @ dans l'adresse
Une foule de conseils utiles sur le site de Misange : http://www.excelabo.net
Bonjour.
Peut être en utilisant les macros XL4. Sélectioner la zone à recopier de la Feuil1 puis lancer la macro.
Sub RecopierMiseEnPageVersLeGroupe() With Application .ExecuteExcel4Macro ("WORKBOOK.SELECT({""Feuil1"";""Feuil2"";""Feuil3""})") .ExecuteExcel4Macro ("FILL.GROUP(1)") .ExecuteExcel4Macro ("WORKBOOK.SELECT(""Feuil1"")") End With End Sub
Alain CROS
"Patrick Bastard" <bastardp"chez"free.fr> a écrit dans le message de news: #WQhtM# :
Je souhaite recopier la mise en forme et les infos (formules ou constantes) d'une feuille 1, mise en page par mes soins, sur les feuilles 2 à 32.
Sur les classeurs Excel4, il existait "recopier vers le groupe".
Même en sélectionnant tous les onglets et en copiant / collant, ça ne le fait pas.
Y a-t-il un équivalent sur Excel XP, ou une alternative (code VBA)
Merci, *Alain CROS*.
*Pour reprendre les termes de ton intervention* -voir en fin de message :
Ton code fonctionne parfaitement, et répond totalement à ma demande.
Qu'il est agréable de voir l'esprit d'entr'aide qui règne sur ce forum...
--
Bien cordialement,
==================================== P. Bastard.
Pour me contacter, remplacez "Chez" par @ dans l'adresse
Une foule de conseils utiles sur le site de Misange :
http://www.excelabo.net
Bonjour.
Peut être en utilisant les macros XL4.
Sélectioner la zone à recopier de la Feuil1 puis lancer la macro.
Sub RecopierMiseEnPageVersLeGroupe()
With Application
.ExecuteExcel4Macro
("WORKBOOK.SELECT({""Feuil1"";""Feuil2"";""Feuil3""})")
.ExecuteExcel4Macro ("FILL.GROUP(1)") .ExecuteExcel4Macro
("WORKBOOK.SELECT(""Feuil1"")") End With
End Sub
Alain CROS
"Patrick Bastard" <bastardp"chez"free.fr> a écrit dans le message de
news: #WQhtM#aEHA.996@TK2MSFTNGP12.phx.gbl...
:
Je souhaite recopier la mise en forme et les infos (formules ou
constantes) d'une feuille 1, mise en page par mes soins, sur les
feuilles 2 à 32.
Sur les classeurs Excel4, il existait "recopier vers le groupe".
Même en sélectionnant tous les onglets et en copiant / collant, ça
ne le fait pas.
Y a-t-il un équivalent sur Excel XP, ou une alternative (code VBA)
Merci, *Alain CROS*. *Pour reprendre les termes de ton intervention* -voir en fin de message :
Ton code fonctionne parfaitement, et répond totalement à ma demande.
Qu'il est agréable de voir l'esprit d'entr'aide qui règne sur ce forum...
-- Bien cordialement, ==================================== P. Bastard. Pour me contacter, remplacez "Chez" par @ dans l'adresse
Une foule de conseils utiles sur le site de Misange : http://www.excelabo.net
Bonjour.
Peut être en utilisant les macros XL4. Sélectioner la zone à recopier de la Feuil1 puis lancer la macro.
Sub RecopierMiseEnPageVersLeGroupe() With Application .ExecuteExcel4Macro ("WORKBOOK.SELECT({""Feuil1"";""Feuil2"";""Feuil3""})") .ExecuteExcel4Macro ("FILL.GROUP(1)") .ExecuteExcel4Macro ("WORKBOOK.SELECT(""Feuil1"")") End With End Sub
Alain CROS
"Patrick Bastard" <bastardp"chez"free.fr> a écrit dans le message de news: #WQhtM# :
Je souhaite recopier la mise en forme et les infos (formules ou constantes) d'une feuille 1, mise en page par mes soins, sur les feuilles 2 à 32.
Sur les classeurs Excel4, il existait "recopier vers le groupe".
Même en sélectionnant tous les onglets et en copiant / collant, ça ne le fait pas.
Y a-t-il un équivalent sur Excel XP, ou une alternative (code VBA)