Dernière occurence d'une valeur dans une colonne ?

Bonjour à tous,

J'ai besoin de déterminer la dernière occurence d'une valeur contenue dans une colonne ("H"), afin de pouvoir lancer une msgbox signalant la fin de la recherche.

Et je ne sais pas faire...

Auriez-vous une idée ou un exemple pour m'aider ?

Merci de votre aide

Bonjour,

les valeurs sont-elles triées ?

=EQUIV("B";H:H;1)

Bonjour à tous,

Une version Vba...

Option Explicit

Sub DerOccur()
Dim DLig As Long  ' dernière ligne
Dim X As Long
Dim Vr            ' valeur recherchée
Dim Mtab()

   Vr = 9      ' < à adapter au besoin
   DLig = ActiveSheet.Cells(Rows.Count, "H").End(xlUp).Row

   For X = DLig To 1 Step -1
      If Cells(X, "H").Value = Vr Then
         MsgBox "La valeur recherchée est en H" & X    ' < traitement désiré...
         Exit Sub
      End If
   Next X
End Sub

ric

Merci Steelson et merci ric,

Merci sreelson pour ton intérêt à mon problème, mais il est vrai que je n'avais pas précisé que je souhaitais une solution en VBA...

Merci quand même...

Merci ric, ta macro fonctionne parfaitement dans une Sub, mais maintenant, j'ai du mal à l'intégrer dans la Private Sub d'un bouton de recherche...

1 heure que je cherche et trifouille pour l'adapter, mais...

Je suis pas très doué, mais je m'accroche, j'y arriverai un jour, j'y arriverai...

Je vais créer un autre poste pour ça.

Merci à tous les deux

Bonjour,

Sans voir l'autre macro, cela m'est plus difficile de répondre. Le contexte est très important pour un junior de mon acabit.

Peut-être un call DerOccur

ric