Bonjour à toutes 🙂 et à tous 🙂,
Il se peut que je n'ai pas vu l'évidence de la chose. Dans ce cas, j'accepte tout quolibet acerbe (pas trop quand même) ou humoristique (et là vous pourrez vous lâcher...).
Si sur mon Excel 2010 :
alors j'obtiens pour :
Range(range("A6"),Range("XFD1048576")).Address(0,0) la valeur 6:1048576 et non A6:XFD1048576
Tandis que pour :
Range(range("A6"),Range("XFC1048576")).Address(0,0) la valeur A6:XFC1048576 ; ce à quoi je m'attends.
Pourquoi dans un cas un range uniquement de colonnes et dans l'autre cas une plage ?
Texte à coller dans la fenêtre d'exécution :
Ce que j’obtiens sur mon bousin :
Il se peut que je n'ai pas vu l'évidence de la chose. Dans ce cas, j'accepte tout quolibet acerbe (pas trop quand même) ou humoristique (et là vous pourrez vous lâcher...).
Si sur mon Excel 2010 :
- je me place sur feuille de calcul
- j'active l'environnement VBE (Alt F11)
- j'affiche la fenêtre d'exécution (Ctrl+g)
- je colle le texte ci-dessous dans la fenêtre d'exécution de VBA
- puis à la fin de chaque ligne commençant par ? Range, on tape Entrée
alors j'obtiens pour :
Range(range("A6"),Range("XFD1048576")).Address(0,0) la valeur 6:1048576 et non A6:XFD1048576
Tandis que pour :
Range(range("A6"),Range("XFC1048576")).Address(0,0) la valeur A6:XFC1048576 ; ce à quoi je m'attends.
Pourquoi dans un cas un range uniquement de colonnes et dans l'autre cas une plage ?
Texte à coller dans la fenêtre d'exécution :
Code:
? Range("A6").Address(0,0) 'cellule A6
? Range("XFD1048576").Address(0,0) 'dernière cellule
? Range(range("A6"),Range("XFD1048576")).Address(0,0) ' de A6 à la dernière cellule
' Alors que
? Range("A6").Address(0,0) 'cellule A6
? Range("XFC1048576").Address(0,0) 'dernière cellule décalée d'une colonne vers la gauche
? Range(range("A6"),Range("XFC1048576")).Address(0,0) ' de A6 à la précédente
Ce que j’obtiens sur mon bousin :
? Range("A6").Address(0,0) 'cellule A6
A6
? Range("XFD1048576").Address(0,0) 'dernière cellule
XFD1048576
? Range(range("A6"),Range("XFD1048576")).Address(0,0) ' de A6 à la dernière cellule
6:1048576
'Et pourquoi Range(range("A6"),Range("XFD1048576")).Address(0,0) <> A6:XFD1048576 ?
' Alors que
? Range("A6").Address(0,0) 'cellule A6
A6
? Range("XFC1048576").Address(0,0) 'dernière cellule décalée d'une colonne vers la gauche
XFC1048576
? Range(range("A6"),Range("XFC1048576")).Address(0,0) ' de A6 à la précédente
A6:XFC1048576
' Dans ce cas : Range(range("A6"),Range("XFC1048576")).Address(0,0) = A6:XFC1048576
Dernière édition: