date d'hier et date de demain

Question

Salut &#224; tous,



Qui peut me aider &#224; ce propos .. je peut savoir s'il ya une possiblit&#233; de retournet dans une variable la date du j+1 ou j-1



merci tres bien ....



Cordialement

Gobillot · Answer

Dim Hier As Date

    Dim demain As Date

    

    Hier = Date - 1

    demain = Date + 1


Daniel

Zlub · Answer

Salut,


sinon avec DateSerial tu peux calculer pour une date autre que la date du jour :

Dim maDate As Date

Dim maDateDemain As Date



maDateDemain = DateSerial(year(maDate),Month(maDate),Day(maDate)+1)

++

Zlub

cs_nico1610 · Answer

tout est dit ...

moulaDj · Answer

merci les mais .. 

j'ai trouver une autre solution qui me parait plus simple et efficace ..

date_du_jour = Date
date_demain = DateAdd("d", 1, date_du_jour)
date_hier = DateAdd("d", -1, date_du_jour)

merci tres bien ....

Gobillot · Answer

tu trouves que c'est plus simple que &#231;a ?



date_demain = Date + 1

date_hier = Date - 1

Daniel

SlimySlobber · Answer

avec VB.Net :



        Dim LaDate, NouvelleDate As Date

        Dim Nombre_de_jours As Integer



        LaDate =  Now.Date

         '&#171;Now.Date&#187; pour aujourd'hui ou une date du stye "31/07/2005" 



        Nombre_de_jours  = 1

        'mettre un nombre n&#233;gatif pour enlever des jours



        NouvelleDate = LaDate.AddDays(Nombre_de_jours)



Slimy Slobber

cs_Stephane · Answer

Slu


Tiens DateSerial premiere fois je la voix :)

A quoi elle sert cette fonction Zlub ?

Elle fait que retourner la date pass&#233; en parametre ?



A+



 Utilisateurs du forum : Merci de lire http://www.vbfrance.com/forum.v2.aspx?ID=445871

Zlub · Answer

Salut,

DateSerial permet de cr&#233;er une date &#224; partir de 3 valeurs num&#233;riques : 

genre DateSerial (2004,8,1) renvoi 1/8/2004



C'est clair que DateAdd(...) est plus adapt&#233; ...


++

Zlub

sniper909 · Answer

Bonjour tt le monde j'ai un probleme avec ce code  je veux balayer par semaine :
 Dim LaDate, NouvelleDate As Date
        Dim Nombre_de_jours As Integer

        LaDate = Now.Date
        

        Nombre_de_jours = 7
        'mettre un nombre négatif pour enlever des jours

        NouvelleDate = LaDate.AddDays(Nombre_de_jours)
ce code fonctione mais le probleme c que il prend tjrs la date.today et du faite je peux ps passer aux dela de ces semaines je ss coincé ds un intervalle de
semaine -7 et semaine +7
kelk1 peut maider ?

Date d'hier et date de demain

9 réponses

Discussions similaires