OVH Cloud OVH Cloud

Equivalent Groupe de travail

2 réponses
Avatar
Patrick Bastard
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

2 réponses

Avatar
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




Avatar
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)