Bonsoir le Forum,

(Etant donné la simplicité de l'exposé, je ne le poste pas dans les contributions).

Je ne pense pas réinventer la roue.
Mais au cas où cela servirait, quelques repères sur la propriété Item attachée à un objet Range.

Nous avons tous aperçu ce genre d'écriture

Code : Sélectionner tout - Visualiser dans une fenêtre à part
Range("F3:L8")(4)
Comment repérer cet objet?
Personnellement, je m'y perds à chaque fois.

1 - Ecriture :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
Range(‘’A3’’)(a) = Range(‘’A3’’).Item(a)
(voir aide en ligne sur “Item”)

Remarque : si l'on n'utilise pas la propriété Item, alors il n'y a pas de point entre l'objet et la valeur de l'Item.


2 - Equivalences par formules :

1 - Objetrange.Item(b) = Objetrange.Cells(1,1).Offset(0,b-1)

2 - Objetrange.Item(a,b) = Objetrange.Cells(1,1).Offset(a-1,b-1)

Attention! (déjà précisé sur le Forum et ailleurs)
Si elle est attachée à un objet Range, alors la propriété .Cells(1,1) désigne la 1ère cellule en haut à gauche de la plage.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
Range("C4:D4").Cells(1,1)
désigne la cellule C4

On peut très bien attacher un objet Range à un autre objet Range.

3 - Exemples d'égalité

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
Sub LaPlage()
 
With Range("B2:F5")
 
        '1ère égalité
        Debug.Print .Item(4).Address
        Debug.Print .Cells(1, 1).Offset(0, 3).Address
 
        '2ème égalité
        Debug.Print .Item(0, 3).Address
        Debug.Print .Cells(1, 1).Offset(-1, 2).Address
 
End With
 
End Sub
A lire :

La Faq du Forum sur les cellules

les cellules sur Développez.com

Bien entendu, vos remarques constructives, voire vos corrections, seront les bienvenues.

Très bonne soirée à tous.