Sélectionné plusieurs range dans un même range

Fermé
Utilisateur anonyme - Modifié par infodes le 2/06/2014 à 21:47
f894009 Messages postés 17233 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 29 janvier 2025 - 3 juin 2014 à 08:47
Bonjour,

j'aimerais choisir dans une feuille plusieurs ranges dans le même range dans le but d'imprimer ces sélection. Mon problème est que les cellules sélectionnées changes de position selon les informations qu'il y a dans la feuille. Ex: Je veux sélectionner de B1:i46 et ensuite, de B121:i153 mais ces cellules ne sont jamais les même. J'ai donc créer des variables pour ces cellules A et B.

Voici comment je sélectionne mes ranges:
range("B1:B46," A &":"& B).select

a = range("b" & ligne x).address et b = range("i" & ligne y).address
c = range("b" & ligne xx).address et d = range("i" & ligne yy).address

ça, sa fonctionne sans problème. Sauf que je dois ensuite aller chercher 2 autres range. Là ça ne fonctionne plus.

Voici comment je sélectionne mes ranges:
range("B1:B46," A &":"& B, C &":"& D).select

Lorsque je fais cela, si on suppose que D est 280, il sélectionne de B1 à I280 sans interruption.

Est-ce que quelqu'un pourrais me dire si c'est faisable et si oui comment?
Si ce n'est pas assez claire, je peux mettre tout le code au complet.

merci de votre aide.

1 réponse

f894009 Messages postés 17233 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 29 janvier 2025 1 712
3 juin 2014 à 08:47
Bonjour,

exemple:

Sub test()
x = 1
y = 2
xx = 4
yy = 6
a = Range("b" & x).Address
b = Range("i" & y).Address
c = Range("b" & xx).Address
d = Range("i" & yy).Address
Range(a & ":" & b & "," & c & ":" & d).Select
End Sub
0