Pages

Affichage des articles dont le libellé est Items. Afficher tous les articles
Affichage des articles dont le libellé est Items. Afficher tous les articles

[Toutes versions] Les items affectées à un objet Range sujet

jeudi 30 janvier 2014




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:


Range("F3:L8")(4)

Comment repérer cet objet?
Personnellement, je m'y perds à chaque fois.

1 - Ecriture :


Code:


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:


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:


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

Plus spécialement sur la propriété Item, la contribution de Laurent Longre hébergé chez la voisine Misange du laboratoire.

les Item par Laurent Longre

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

Très bonne soirée à tous.