XL 2016 Sélection discontinue xlDown et xlRight

[tontonexcel]

Bonjour à tous,

ça doit être assez "bête" mais j'ai un souci concernant une sélection multiple avec xldown et xlRight ensemble

Je teste ce code c'est ok (sachant que j'ai bien des valeurs dans ces cellules pour vérif)

Application.Union(Range("A1", Range("A1").End(xlDown)), Range("C1:D1", Range("C1:D1").End(xlDown))).Select

Je voulais rajouter une plage de G1 vers la droite et j'ai donc fait

Application.Union(Range("A1", Range("A1").End(xlDown)), _
Range("C1:D1", Range("C1:D1").End(xlDown)), _
Range("G1", Range("G1").End(xlRight))).Select

J'ai une erreur 1004 erreur définie par appli ou objet
Je pense que le problème vient du fait qu'il y a 2 directions
Pouvez-vous me le confirmer ?
Merci

 

[jmfmarques]

Bonjour

J'ai une erreur 1004 erreur définie par appli ou objet
Je pense que le problème vient du fait qu'il y a 2 directions

La méthode Union se moque comme de l'an 14 de l'ordre des objets range qu'elle unit.
Encore faut-il que ces objets soient définis de manière orthodoxe ...
l'objet Range("G1").End(xlRight) ne saurait exister, pas plus que n'existe le paramètre xlRight de la propriété Range.End. Etourderie à corriger.

 

[tontonexcel]

Bonsoir jmfmarques

Paf paf bien sur xlToRight !!
Au moins j'ai mis le doigt dessus
Bonne soirée