XL 2013 Copier coller sur 3 onglets

Eric C

XLDnaute Barbatruc

• 1 Mars 2022

• #16

Re le fil,

Oui (je suis assez assidu). J'ai testé et retesté après l'arrêt d'Excel (of course... j'avais redémarré l'appli ....) mais que nenni..
Je recommencerai demain après l'extinction du PC.
Bonne soirée
Eric

 

Vote positif 0 Vote négatif

Eric C

XLDnaute Barbatruc

• 1 Mars 2022

• #17

Oupsssss. J'avais dit avoir la version 2010 - 64Bits mais non..... c'st la 32 bits.
@+

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 1 Mars 2022

• #18

Re

Voila qui prouve au moins que c'était disponible depuis Excel 2003

FillAcrossSheets Method [Excel 2003 VBA Language Reference]

docs.microsoft.com

 

Vote positif 0 Vote négatif

Efgé

XLDnaute Barbatruc

• 2 Mars 2022

• #19

Bonjour à tous
Toujours même version.
Regarde la pièce jointe 1132356
MiseAjourRegistre_B ==> Ok
MiseAjourRegistre_C ==> Ok
MiseAjourRegistre_D ==> Ko

Cordialement

 

Dernière édition: 2 Mars 2022

Vote positif 0 Vote négatif

maval

XLDnaute Barbatruc

• 2 Mars 2022

• #20

Bonjour la version 2013

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 2 Mars 2022

• #21

Bonsoir le fil

Efgé
Pourquoi Ko?
Que se passe-t-il quand tu lances la macro MiseAjourRegistre_D?

 

Vote positif 0 Vote négatif

Efgé

XLDnaute Barbatruc

• 3 Mars 2022

• #22

Bonjour à tous, Salut @Staple1600

Staple1600 à dit:

Bonsoir le fil

Efgé
Pourquoi Ko?
Que se passe-t-il quand tu lances la macro MiseAjourRegistre_D?

Cliquez pour agrandir...

Résultat brut de fonderie de MiseAjourRegistre_D en Feuil2 et Feuil3


Cordialement

EDIT
La maison ne reculant devant aucun sacrifice, un test sous 2007 a été réalisé.
Résultat : IDEM pour MiseAjourRegistre_D sauf pour la première cellule copiée qui a bien la mise en forme (gris) contrairement à 365.

 

Dernière édition: 3 Mars 2022

Vote positif 0 Vote négatif

Eric C

XLDnaute Barbatruc

• 4 Mars 2022

• #23

Bonjour le forum
Bonjour le fil

@Staple1600 : Après essai avec un PC redémarré, les macro B & C fonctionnent comme il se doit mais rien pour la D. Aucune donnée (Résultat identique que celui présenté par notre ami Efgé).
@+ Eric c

 

Vote positif 0 Vote négatif

Efgé

XLDnaute Barbatruc

• 4 Mars 2022

• #24

Bonjour à tous
@Eric C
En fait la version D fonctionne, elle ne copie que le format de la plage d'origine

Cordialement

 

Vote positif 0 Vote négatif

Eric C

XLDnaute Barbatruc

• 4 Mars 2022

• #25

Re le fil
@Efgé : Au temps pour moi (y a pas un ptit trou de pour m'y cacher ???).

@+ Eric c

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 4 Mars 2022

• #26

Re

Donc finalement, FillAcrossSheets fonctionne chez tout le monde ?
(à part chez job75 ?)

 

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 4 Mars 2022

• #27

Bonjour tout le monde,

Staple1600 à dit:

NB: A vérifier mais je pense que FillAcrossSheets était déjà disponible sous Excel 97

Cliquez pour agrandir...

Sous XL2007 VBA 6.3, B et C ok, D KO.
Donc FillAcrossSheets marche bien sur 2007.

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 4 Mars 2022

• #28

Bonsoir Sylvanu

D KO?
xlFillWithFormats ne reproduit que le format (comme son nom l'indique )
C'est donc ce que fait la macro D.

 

Dernière édition: 4 Mars 2022

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 4 Mars 2022

• #29

Oups! Pour D c'est ok.
J'en suis resté à la demande initiale de Maval sur la copie des valeurs.
Bon je vais me coucher, ça vaut mieux.

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 4 Mars 2022

• #30

Re

Alors pour ne "copier" que les valeurs, j'aurai du écrire dans ma 1ère réponse

VB:

Sub MiseAjourRegistre()
Dim arrWSN
arrWSN = Array("Inscription", "Table", "Score")
Worksheets(arrWSN).FillAcrossSheets Worksheets("Inscription").Range("B5:B60"), xlFillWithContents
End Sub

 

Vote positif 0 Vote négatif