Sélection de plage et lignes par des chiffres,

[Charly88]

Bonjour à tous, je suis confronté à un problème de syntaxe qui me bloque totalement pour la suite ; à savoir remplacer les coordonnées A1 par (1,1) pour une multisélection.

Ces deux-là je sais faire :

Range("B2").Select =>  Cells(2, 2).Select

Range("B2:C3").Select => Range(Cells(2, 2), Cells(3, 3)).Select

Par contre ces deux suivants, je sèche complètement, c'est notamment le second qui m'intéresse le plus :

Rows("10:15").Select

[b]Range("B5:H6,B8:H8,B10:H10").Select[/b]

Si je devine que la traduction des cellules est similaire, par quoi remplacer ces maudits deux points ?
La 2è se traduit par la sélection de 14 cellules (B5:H6) + deux fois 7 (B8:H8) et (B10:H10).

Merci beaucoup d'avance !

 

[Dull]

Re : Sélection de plage et lignes par des chiffres,

Salut Charly88, le Forum

tout simplement comme cela

Range("B5:H6[COLOR=Red][B],[/B][/COLOR]B8:H8").Select

Si j'ai bien compris

Bonne Journée

 

[mécano41]

Re : Sélection de plage et lignes par des chiffres,

Bonjour,

Pas sûr d'avoir compris mais avec ça :

Union(Cells(1, 1), Cells(3, 2), Range("D12:D22")).Select

tu sélectionnes par ex. : A1, B3 et de D12 à D22

Cordialement

 

[Charly88]

Re : Sélection de plage et lignes par des chiffres,

Je vois que je n'ai pas été très clair, j'ai édité la fin du message et je colle ici :

Comment remplacer les coordonnées des cellules de ce code par des chiffres et ainsi faire une multisélection ?

[b]Range("B5:H6,B8:H8,B10:H10").Select[/b]

Cette formule se traduit par la sélection de 14 cellules (B5:H6) + deux fois 7 (B8:H8) et (B10:H10).


J'ai tenté quelque chose avec ta formule Mécano mais elle ne me sélectionne que les cellules indiquées au lieu de les considérer comme les limites des plages à sélectionner :

Union(Cells(2, 2), Cells(2, 6), Cells(3, 2), Cells(3, 6), Cells(4, 2), Cells(4, 6)).Select

Sélectionne B2,B3,B4 et F2,F3 et F4 et non de B2 à F2, de B3 à...

 

[bouley]

Re : Sélection de plage et lignes par des chiffres,

Bonjour le forum,
pour coller avec ta question. (n'utiliser que cells() !)

Union(Range(Cells(5, 2), Cells(6, 8)), Range(Cells(8, 2), Cells(8, 8))).Select

@+

 

[bouley]

Re : Sélection de plage et lignes par des chiffres,

donc :

Range("B5:H6,B8:H8,B10:H10").Select

=

   Union(Range(Cells(5, 2), Cells(6, 8)), Range(Cells(8, 2), Cells(8, 8)), Range(Cells(10, 2), Cells(10, 8))).Select

 

[Charly88]

Re : Sélection de plage et lignes par des chiffres,

Impeccable, merci à vous tous et particulièrement à Bouley... à propos, tu n'aurais pas une idée pour les lignes par hasard ?
Traduction de

Rows("10:15").Select

 

[STephane]

Re : Sélection de plage et lignes par des chiffres,

si tu y tiens vraiment
Range(Cells(i, 1), Cells(j, 1)).EntireRow.Select
Rows(i & ":" & j).Select