Range : les différentes écritures

**siril** · 21/07/2014, 00h14

Bonjour,

Pour sélectionner les cellules A1 à D4, il me semble qu'il y a (au moins) ces 3 méthodes :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
```
Range("A1:D4").Select
```
Code : Sélectionner tout - Visualiser dans une fenêtre à part
```
[A1:D4].Select
```
Code : Sélectionner tout - Visualiser dans une fenêtre à part
```
Range(Cells(1, 1),Cells(4, 4)).Select
```

Quelles sont les différences entre ces écritures ? Y en at-il d'autres ?

D'avance, merci

**kiki29** · 21/07/2014, 02h01

Salut, voir dans la FAQ, par exemple ici ou là.

**Docmarti** · 21/07/2014, 02h47

Bonjour siril

Envoyé par siril

Quelles sont les différences entre ces écritures ? Y en a-t-il d'autres ?

Ca faisait longtemps que je voulais faire cette recherche. Mais personne ne posait la question. Merci à toi.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
Sub tt()
 
Dim r As String
r = "A1:D4"
Range(r).Select
 
Range("A1:D4").Select
 
Range(Cells(1, 1).Address & ":" & Cells(4, 4).Address).Select
 
Range("A1", "D4").Select
 
Range(Cells(1, 1), Cells(4, 4)).Select
 
Range("A1").Resize(4, 4).Select
 
Range("E1").Offset(, -4).Resize(4, 4).Select
 
Application.Goto ActiveWorkbook.Sheets("Feuil1").Range("A1", "D4")
 
Application.Union(Range("A1", "B4"), Range("C1", "D4")).Select
 
Cells.ClearContents
 
Range("A1", "D4").Value = "test"
ActiveSheet.Range("a1", ActiveSheet.Range("D1").End(xlDown)).Select
 
ActiveSheet.Range("a1", ActiveSheet.Range("a1").End(xlDown).End(xlToRight)).Select
 
End Sub

Invité · 21/07/2014, 12h08

Salut,

Sans utiliser de Parent pour le Range (Ex : Application), ni de propriété intermédiaire entre Range et Select (Ex: .Offset), il n'y a pas tant de méthode que ça.

Il y a aussi l'écriture avec le nom complet d'un Range à l'intérieur d'un Range en utilisant l'écriture accès collection:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
Sub Test()
    Set Rng = Range("[Classeur1]Feuil1!A1:A4")
    'Set Rng = [[Classeur1]Feuil2!A1:A4]
    Debug.Print Rng.Address(External:=True)
    Application.Goto Rng
End Sub

Pour le select, on peut utiliser Application.Goto utilisé par Docmarti. Mais je n'ai jamais vraiment utilisé cette écriture pour le Range (elle est dangereuse) surtout aussi que ça ne marche pas si le Parent du Range n'est pas correctement renseigné dans le cas où il y aurait plusieurs feuilles.

-------------------------------

EDIT (et léger hors-sujet en même temps

):

Ça confirme que le Range est compliquer à comprendre et que finalement, écrire Range(...) en dehors d'une feuille de calcul (Feuil1 par exemple) ne signifie pas systématiquement ActiveSheet.Range(...) comme cela est écrit sur MDSN.

Lorsqu’elle est utilisée sans qualificateur d’objet, cette propriété est un raccourci pour ActiveSheet.Range (elle renvoie une plage à partir de la feuille active ; si cette dernière n’est pas une feuille de calcul, la propriété échoue).

Puisqu'en activant une feuille de graphique dans le même classeur, Range("[Classeur1]Feuil1!A1:A4"), Range("Feuil1!A1:A4") ou [[Classeur1]Feuil1!A1:A4],[Feuil1!A1:A4] fonctionnent dans un module standard même si cela échoue tout de même lorsque le classeur actif est différent de celui spécifié à l'intérieur du Range.

C'est d'ailleurs confirmé par le fait que ActiveSheet.Range("Feuil1!A1:A4") échoue dans le cas où la feuille active est par exemple un graphique (ce qui parait normal) ce qui n'est pas le cas sans qualificateur d'objet.

... et vu que les appels passent par les classes Global et _Global qui sont non documentées, ça n'aidera pas à comprendre ce que fait réellement le Range.

**siril** · 21/07/2014, 19h07

Merci à tous pour vos réponses

@kiki29, j'ai pris le temps de lire. Une dizaine de fois chacun des liens. Pour moi qui me me remets au VBA, cela ne m'aide pas beaucoup... voir m'embrouille ^_^'

@Docmarti, de rien ! par contre, je ne te remercie pas de me montrer encore d'autre méthodes ! :p

@Nouveau2, je pense comprendre ce que tu as écris, mais il me semble que ça ne répond pas directement à la question (est ce que ces différentes écritures changent quelques choses, sur le fond ou sur la forme ?).

Invité · 21/07/2014, 20h12

La 2ème partie est un hors-sujet.
Ça ne répond pas à la question.

La 1ère partie est une méthode peu utilisé mais qui est une solution comme une autre pour indiquer que le range fait référence à une feuille bien précise en spécifiant le nom de la feuille à l'intérieur même de la propriété Range.
Mais c'est vrai que ça ne répond pas vraiment non plus à la question

C'est la même écriture que la 1ère ligne de code donné dans ton 1er poste.

**siril** · 21/07/2014, 21h42

Envoyé par siril

Pour sélectionner les cellules A1 à D4, il me semble qu'il y a (au moins) ces 3 méthodes :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
```
Range("A1:D4").Select
```
Code : Sélectionner tout - Visualiser dans une fenêtre à part
```
[A1:D4].Select
```
Code : Sélectionner tout - Visualiser dans une fenêtre à part
```
Range(Cells(1, 1),Cells(4, 4)).Select
```

Quelles sont les différences entre ces écritures ? Y en at-il d'autres ?

D'avance, merci

Pour être plus précis sur ma question :
Est ce que sur le fond, l'une ou l'autre de ces écritures peut changer le résultat d'une action / opération / valeur... ?
Est ce que sur la forme, l'approche prend un sens différent ? Est ce que l'une de ces méthodes est plus élégante ?

**Theze** · 22/07/2014, 07h02

Bonjour,

Est ce que sur le fond, l'une ou l'autre de ces écritures peut changer le résultat d'une action / opération / valeur... ?

Absolument pas, puisque ça fait référence au même Range et le compilateur sait très bien interpréter !

Est ce que sur la forme, l'approche prend un sens différent ? Est ce que l'une de ces méthodes est plus élégante ?

La propriété Range peut recevoir soit un String ou alors d'autres Range (Cellules qui borne la plage) dans ce cas, ça permet un accès plus facile avec des Integer ou des Long !
L'écriture entre crochets utilise en fait la fonction "Evaluate" :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part