Discussion :

[SmOkEiSBaD]

Bonjour,
Je sélectionne un Range grâce à la fonction GoTo, je souhaiterais récupérer ce Range dans un objet de type CRange.
Je ne trouve pas de fonction du type get_CurrentSelection ou get_CurrentRange, et la fonction get_ActiveCell ne me renvoie pas tout mon range mais seulement la première cellule de ceui-ci...

Y a t-il une solution ?

Merci.

[zazaraignée]

Parce qu'il y a l'objet ActiveCell que tu peux appeler directement. Exemple :

Code :

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

MsgBox "La valeur de la cellule " & ActiveCell.Address & " est " ActiveCell.Value

[mayekeul]

bonjour,

Code :

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

MsgBox "La valeur de la cellule " & ActiveCell.Address & " est " ActiveCell.Value

je mettrais plutot ça

Code :

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

MsgBox "La valeur de la cellule " & selectionAddress & " est " ActiveCell.Value

[SmOkEiSBaD]

Bonjour,
Le problème est que mon Range est plus grand qu'une Cellule, et la première cellule de ce Range est également un Range nommé, donc lorsque j'utilise Active_Cell il me renvoie le nom de la Cellule et non mon Range entier.

[zazaraignée]

Non, non! nous ne sommes pas ...

Et j'ai bien mis le mot Exemple juste avant mon exemple...

Il faut boucler sur tous les objets Range de ton bloc de cellules

Code :

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

1
2
3
4
Dim cellule As Range
For Each cellule In Selection
    ' tu mets ton code ici
Next cellule

[SmOkEiSBaD]

Ce n'est pas tout à fait ce que je souhaite faire, je rééxplique le problème :
- J'ai un Range qui s'appelle "record" (3 cellules)
- Dans ce Range j'ai deux autres Ranges "r.vente" (1 Cellule) et "r.prix" (1 Cellule)
- Avec la fonction GoTo je selectionne mon range "record"
- Après souhaitant récupérer mon Range "record" sous une objet de type CRange, j'utilise ActiveCell qui me renvoie la première cellule de "record" c'est à dire "r.vente"
- Donc au final je n'ai pas "record" mais seulement "r.vente"

Je ne sais pas si j'ai été plus clair
On verra bien.

[mayekeul]

et si tu utilise "selection" plutot que "activecell"?