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
6
Affichages
323

Statistiques des forums

Discussions
313 075
Messages
2 095 041
Membres
106 160
dernier inscrit
bingmp