Salut à tous,

J'aide un ami pour un projet en VBA.

Il faudrait récupérer l'adresse de la cellule, mais ça ne renvoit pas la valeur attendu !

code :

For i = 1 To UBound(unit())

    MsgBox ("okk")
    MsgBox i
    If unit(ind(i)) = "L" Then
        cell = ActiveCell.Address
        MsgBox cell
        Exit For
        End If
    
Next i

La boucle For me permet de me déplacer dans le tableau. QUand je croise la valeur "L" dans la cellule, je récupére son adresse (dans cell), je l'affiche (pour vérifier) et je quitte la boucle ainsi que la condition.

Ma colonne commence en O25 et se termine en O43. Or, la première occurence de "L" se trouve en O31, Je devrais donc obtenir "O31" dans cell. Eh bien non, cell m'affiche O25, la première case de ma colonne !

Quelqu'un pourrait m'aider à résoudre ce soucis ?

Merci beaucoup d'avance,

Flavien

umfred a écrit:

résolu ?