Rechercher une date dans une feuille excel

R

RLOUIS

Guest
Je recherche comment faire pour afficher une date a partir d'une feuil 1 dans une colonne de 120 dates, celle qui est le plus proche de maintenant()
dans une feuil 2
Si quelqu'un à la reponse, merci.
 
T

Ti

Guest
pas eu le courage de chercher avec les fonctions Excel, alors voici une fonction en VBA qui renvoie la date trouvée la plus proche de la date système dans la plage spécifiée :

Function RECHERCHEDATE(Plage As Range) As Variant
Dim Cel As Range, Valeur, LaDate
LaDate = Date
Valeur = LaDate
For Each Cel In Plage
If Abs(Cel.Value - LaDate) <= Valeur Then
Valeur = Abs(Cel.Value - LaDate)
RECHERCHEDATE = Cel.Value
End If
Next Cel
End Function

exemple d'utilisation : =recherchedate(Feuil1!A1:A47)
Pour avoir un affichage correct, tu dois mettre ta cellule au format Date
 

Discussions similaires

Réponses
2
Affichages
217
Réponses
9
Affichages
320
Réponses
4
Affichages
267
Réponses
3
Affichages
113

Statistiques des forums

Discussions
314 655
Messages
2 111 605
Membres
111 217
dernier inscrit
aladinkabeya2