Accéder à la dernière ligne d'un range +1 (VBA)

Salut à tous,

Je cherche un moyen d'écrire ce qui est dans le titre.

Sur un range de cellules admettons (A4:A10),

je souhaiterais accéder à la dernière valeur de cette sélection dont la valeur est différente à "0" +une ligne

Autre élément dès lors où il y a un "0" dans la sélection, toutes les autres valeurs suivantes sont égales à "0" aussi. C'est juste pour donner un indice.

Exemple :

A4 55

A5 59

A6 27

A7 88

A8 0

A9 0

A10 0

Donc ici l'objectif est de sélectionner la cellule A8.

Voila. Merci d'avance

Cordialement

bonjour,

proposition

réponse dans la variable dl

Sub test()
    dl = Cells(Rows.Count, 1).End(xlUp).Row

    While Cells(dl, 1) = 0
        dl = dl - 1
    Wend
    dl = dl + 1

End Sub

Merci pour ta réponse.

J'ai essayé la formule mais sans succès (adaptée à mon tableau bien sûr).

Tu as peut être une autre idée quand à la façon de procéder ?

Merci encore.

Cordialement

Cells(Application.Match(0, Columns(1), 0), 1).Select

Merci énormément, c'est exactement ça!!!!

Sujet résolu

Cordialement

Rechercher des sujets similaires à "acceder derniere ligne range vba"