> madateÚteadd("d",-1*nbjour,ladate), ca les aditionne....
Ne peux-tu faire un simple :
MaDate := LaDate - nbJour;
?
ng
Bonjour,
Sisi ca fonctionne :
Dim dtDate As Date, dtDate2 As Date, intNbDay As Integer dtDate = #2/23/2003# intNbDay = 5 dtDate2 = DateAdd("d", -1 * intNbDay, dtDate) Debug.Print dtDate2
Es-tu sûr que ton nbjour est bien positif ?
-- Nicolas G. FAQ VB : http://faq.vb.free.fr API Guide : http://www.allapi.net Google Groups : http://groups.google.fr/ MZ-Tools : http://www.mztools.com/ http://apisvb.europe.webmatrixhosting.net/
m a écrit :
Bonjour,
Je ne parviens pas à soustraire des jours à une date avec DateAdd : madateÚteadd("d",-1*nbjour,ladate), ca les aditionne....
Merci du coup de main.
Bonjour,
Sisi ca fonctionne :
Dim dtDate As Date, dtDate2 As Date, intNbDay As Integer
dtDate = #2/23/2003#
intNbDay = 5
dtDate2 = DateAdd("d", -1 * intNbDay, dtDate)
Debug.Print dtDate2
Es-tu sûr que ton nbjour est bien positif ?
--
Nicolas G.
FAQ VB : http://faq.vb.free.fr
API Guide : http://www.allapi.net
Google Groups : http://groups.google.fr/
MZ-Tools : http://www.mztools.com/
http://apisvb.europe.webmatrixhosting.net/
m <orange.maori@caramail.com> a écrit :
Bonjour,
Je ne parviens pas à soustraire des jours à une date avec DateAdd :
madateÚteadd("d",-1*nbjour,ladate), ca les aditionne....
Dim dtDate As Date, dtDate2 As Date, intNbDay As Integer dtDate = #2/23/2003# intNbDay = 5 dtDate2 = DateAdd("d", -1 * intNbDay, dtDate) Debug.Print dtDate2
Es-tu sûr que ton nbjour est bien positif ?
-- Nicolas G. FAQ VB : http://faq.vb.free.fr API Guide : http://www.allapi.net Google Groups : http://groups.google.fr/ MZ-Tools : http://www.mztools.com/ http://apisvb.europe.webmatrixhosting.net/
m a écrit :
Bonjour,
Je ne parviens pas à soustraire des jours à une date avec DateAdd : madateÚteadd("d",-1*nbjour,ladate), ca les aditionne....
Merci du coup de main.
m
non, non j'ai m.... plus haut dans le code..
Merci
"ng" a écrit dans le message de news:%
Bonjour,
Sisi ca fonctionne :
Dim dtDate As Date, dtDate2 As Date, intNbDay As Integer dtDate = #2/23/2003# intNbDay = 5 dtDate2 = DateAdd("d", -1 * intNbDay, dtDate) Debug.Print dtDate2
Es-tu sûr que ton nbjour est bien positif ?
-- Nicolas G. FAQ VB : http://faq.vb.free.fr API Guide : http://www.allapi.net Google Groups : http://groups.google.fr/ MZ-Tools : http://www.mztools.com/ http://apisvb.europe.webmatrixhosting.net/
m a écrit :
> Bonjour, > > Je ne parviens pas à soustraire des jours à une date avec DateAdd : > madateÚteadd("d",-1*nbjour,ladate), ca les aditionne.... > > Merci du coup de main.
non, non j'ai m.... plus haut dans le code..
Merci
"ng" <ng@ngsoft-fr.com> a écrit dans le message de
news:%23zHpVnHTEHA.3700@TK2MSFTNGP09.phx.gbl...
Bonjour,
Sisi ca fonctionne :
Dim dtDate As Date, dtDate2 As Date, intNbDay As Integer
dtDate = #2/23/2003#
intNbDay = 5
dtDate2 = DateAdd("d", -1 * intNbDay, dtDate)
Debug.Print dtDate2
Es-tu sûr que ton nbjour est bien positif ?
--
Nicolas G.
FAQ VB : http://faq.vb.free.fr
API Guide : http://www.allapi.net
Google Groups : http://groups.google.fr/
MZ-Tools : http://www.mztools.com/
http://apisvb.europe.webmatrixhosting.net/
m <orange.maori@caramail.com> a écrit :
> Bonjour,
>
> Je ne parviens pas à soustraire des jours à une date avec DateAdd :
> madateÚteadd("d",-1*nbjour,ladate), ca les aditionne....
>
> Merci du coup de main.
Dim dtDate As Date, dtDate2 As Date, intNbDay As Integer dtDate = #2/23/2003# intNbDay = 5 dtDate2 = DateAdd("d", -1 * intNbDay, dtDate) Debug.Print dtDate2
Es-tu sûr que ton nbjour est bien positif ?
-- Nicolas G. FAQ VB : http://faq.vb.free.fr API Guide : http://www.allapi.net Google Groups : http://groups.google.fr/ MZ-Tools : http://www.mztools.com/ http://apisvb.europe.webmatrixhosting.net/
m a écrit :
> Bonjour, > > Je ne parviens pas à soustraire des jours à une date avec DateAdd : > madateÚteadd("d",-1*nbjour,ladate), ca les aditionne.... > > Merci du coup de main.
