OVH Cloud OVH Cloud

copier des plages avec union

13 réponses
Avatar
JP
Bonjour,

Est-ce qu'il existe une m=E9thode pour copier et coller des plages avec uni=
on?

Exemple de ce que je voudrais faire:

' copie de plages se jouxtant
Union(Range("A1:B12"), rangez("C1:F12")).copy
' selection de plages =E9loign=E9es
Union(Range("A1:B12"), Range("K1:N12")).select

Selection.PasteSpecial Paste:=3DxlPasteValues, Operation:=3DxlNone, SkipBla=
nks:=3DTrue, Transpose:=3DFalse

J'ai un message d'erreur 1004 avec "La m=E9thode de pastespecial de la clas=
se range =E0 =E9chou=E9e"

Merci

JP

3 réponses

1 2
Avatar
isabelle
bonjour JP,

http://cjoint.com/?DDsuNWzNSvN

dit-moi si c'est ce que tu voulais ?

isabelle

Le 2014-04-18 10:42, JP a écrit :
Elles sont les mêmes tant qu'un nouveau nom n'est pas ajouté en feuille 1.
On ne tourne pas en rond. La partie de droite du tableau de la feuille 2 reprend les noms de la feuille 1 et les données (chiffres) de la feuille2.
Après les copies, tout devrait rentrer en ordre.
Mais ce n'est pas le cas dans ma démarche.

JP

Avatar
JP
Il faut que je regarde de plus près pour la suppression des noms.
La proposition est tout autre mais intéressante.

Je reviendrai vers toi demain pour te dire si j'ai réussi à l'adapter.

Merci beaucoup!

JP
Avatar
JP
Bonjour Isabelle et Denis,

A force d'entêtement, j'y suis arrivé.
Je vous livre ma version: http://cjoint.com/?DDtl6xZmjPD

Si vous avez plus efficace, je suis preneur.
Dans cet exemple, il y a peu de données. C'est donc très rapide.

Dans mon fichier, j'ai jusqu'à 53 lignes, 53 colonnes et trois feuilles s ont impactées par ce tri. Autrement dit, il faut beaucoup de temps. C'est toujours trop long.

Merci à vous deux

JP
1 2