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