Discussion :

[Ariaar]

Bonjour à tous,

Je souhaiterais récupérer une cellule dans une objet Excel.Range à partir de la ligne d'une cellule et de la colonne d'une autre cellule, les deux étant stocké dans des objets Excel.Range.

Actuellement, j'utilise le code suivant:

Code :

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

1
2
Set myRange = myWorksheet.Range(Split(Columns(myRange1.Column).Address(ColumnAbsolute:=False), ":")(1) _
& myRange2.Row)

J'imagine qu'il existe une solution plus simple...

Je vous remercie d'avance pour vos réponses

[patricktoulon]

bonjour
en gros tu veut recupérer la derniere cellule en bas a droite d'une plage
exemple avec la plage de a1 a f10

Code :

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

set adresse=replace(split(range("a1:f10"),":")(1),"$","")

bien que la suppression des dollars dans l'adresse n'est pas obligatoire
au plaisir

[Ariaar]

Bonjour patricktoulon,

Je ne souhaite pas récupérer une plage mais une cellule.
J'ai du mal m'exprimer sur mon premier message donc je reprends.

J'ai trois cellules:

• myRange, a qui je souhaite affecter une valeur
• myRange1, qui contient une cellule dont je ne souhaite récupérer que la colonne
• myRange2, qui contient une cellule dont je ne souhaite récupérer que la ligne

myRange1 et myRange2 contiennent des valeurs qui ont été déterminée plus tôt par une autre fonction.

Je vais finir par un exemple pour être sûr d'être bien compris. Admettons que ma fonction me donne myRange1 = "C8" et myRange2 = "B5". Je souhaite donc que myRange = "C5".
J'espère que j'ai été plus clair que dans mon premier message

Merci encore

[cafeine]

Salut,

vu d'ici ça a l'air simple ou trop simple, as-tu essayé les fonctions suivantes ?
.Row
.Column
.Value

Code :

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

MyValue = objWorksheet.Cells(myRange1.row, myRange2.column).Value

ou pour récupérer une plage

Code :

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

Set MyRange = objWorksheet.Cells(myRange1.row, myRange2.column)

[Ariaar]

Oui, c'est exactement ce que je recherchais! Merci beaucoup!

Je ne connaissais pas la propriété Cells de Worksheet, je passais toujours pas Range et je trimbalais des formules super longues pour accéder à une cellule alors que j'avais toutes les infos!

Encore merci cefeine et patricktoulon, et bonne journée