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

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("c" & 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.

Bonsoir

Vérifies si c'est ce que tu cherches (il y surement plus simple)

Sub test()
Dim A As String, B As String, C As String, D As String
Dim LigneX As Integer, LigneY As Integer, LigneXX As Integer, LigneYY As Integer

  LigneX = 121
  LigneY = 153
  LigneXX = 180
  LigneYY = 280

  A = Range("b" & LigneX).Address
  B = Range("i" & LigneY).Address
  C = Range("b" & LigneXX).Address
  D = Range("i" & LigneYY).Address

  Range("B1:B46," & A & ":" & B & "," & C & ":" & D).Select

End Sub

Ça fonctionne très bien. merci pour la réponse.

Rechercher des sujets similaires à "selectionne range meme"