Problème avec plage variable

[blord]

Bonjour à tous,

J'ai ce petit bout de code pour trouver la dernière valeur d'une plage fixe :

MsgBox Range("CM2:ET2").Find("*", Range("ET2"), xlValues, , 1, 2, 0)(1).Value

J'essaie de convertir le tout pour l'adapter à une plage variable (en fait, c'est la ligne qui sera variable) :

Sheets("data").Activate
Range("A2").Select
j = ActiveCell.Row
Set Plage = Range(.Range("CM" & j), .Range("ET" & j))
MsgBox Plage.Find("*", Range("ET" & j), xlValues, , 1, 2, 0)(1).Value

Mais j'obtient un erreur sur le bout de code :
Set Plage = Range(.Range("

Comment devrais-je modifier mon code pour que le tout fonctionne soit chercher la dernière valeur entre les colonnes CM:ET de la ligne active...

Merci pour votre aide....

 

[Pierrot93]

Re : Problème avec plage variable

Bonjour,

essaye peut être ainsi :

Set Plage = Range("CM" & j  & ":ET" & j)

si j'ai bien compris...

bon après midi
@+

Edition : Suppression d'un point, à priori pas de bloc "with"

 

[blord]

Re : Problème avec plage variable

Bonjour Pierrot93,

Un peu en retard mais merci beaucoup !

Benoit Lord