VBA Fonctions MIN & RECHERCHEH

Résolu/Fermé
Roullours Messages postés 1 Date d'inscription jeudi 15 février 2018 Statut Membre Dernière intervention 15 février 2018 - 15 févr. 2018 à 19:02
 Roullours - 15 févr. 2018 à 20:33
Bonjour à toutes et à tous,


Je souhaiterai créer un bouton associé à une macro qui réalise les actions suivantes:
- trouver la plus petite date de la colonne A
- trouver la même date sur la ligne 3 et activer la cellule qui l'a contient (ce qui me permettra de me rendre sur cette cellule).

Cela ressemble à une combinaison de la fonction MIN et RECHERCHE H mais je n'arrive pas à l'écrire en code VBA.

Pouvez vous m'aider svp.

Merci par avance pour vos réponses

1 réponse

via55 Messages postés 14403 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 24 avril 2024 2 703
Modifié le 15 févr. 2018 à 19:20
Bonsoir Roullours

Essaie :
Private Sub CommandButton1_Click()
datemin = Application.WorksheetFunction.Min(Range("A:A"))
col = Application.WorksheetFunction.Match(datemin, Range("3:3"), 0)
Cells(3, col).Activate
End Sub


Ce n'est pas un mix de MIN et de RECHERCHEH (qui donnerait une date) mais de MIN et de EQUIV (qui donne un rang dans las série, donc une colonne)

Cdlmnt
Via

0
Parfait cela fonctionne très bien!

Merci pour ta rapidité et ton efficacité.
0