VBA - Recherche d'une date approximative

VBA - Recherche d'une date approximative - VB/VBA/VBS - Programmation

Marsh Posté le 25-08-2006 à 11:45:44    

Bonjour tout le monde, j'aurais besoin de vos lumieres  :hello: .
 
Voila j'essaye de faire une fonction, qui me recherche, dans un plage donnée, une date que je rentre grace a une msgbox.
Si jamais cette date rentrée n'existe pas, j'aimerai que la fonction me renvoie la plus proche date qui correspond.
 
Merci de votre aide car je seche un peu la  :heink: .
 
@pluche.
 
seb.

Reply

Marsh Posté le 25-08-2006 à 11:45:44   

Reply

Marsh Posté le 25-08-2006 à 11:54:57    

C'est pas très clair.
 
"la date n'existe pas", c'est à dire ? Tu as une liste, mettons :
 
01/01/2006
05/01/2006
06/01/2006
 
Je tape "04/01/2006" et ça doit retourner 05/01/2006, c'est ça ?
 
Alors c'est "simple.
 
Tu tries tes dates dans un tableau.
Ensuite, tu parcoures les dates une à une.
A la première qui est >= à la date saisie :
- Si les deux dates sont égales, tu retourne la date en question
- Sinon, tu fait asb(datediff(datesaisie, ladateencours)) et abs(datediff(datesaisie, ladateprecedente))
=> et tu retourne la date qui retourne la plus petite valeur pour ce test

Reply

Marsh Posté le 25-08-2006 à 12:39:15    

pfiou ben oui jsuis un peu bete des fois,  
 
mirci j'ai trouvé la solution grace a toi ;).
 
mirci

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed