Comptage de jours Excel Vs VB

Thierry wrote:

Bonjour,

J'ai posé ma question sur le forum Excel mais elle concerne également
le forum VB.

Selon que j'utilise Excel ou Visual Basic 2008 Express, le nombre de
jours n'est pas le
même.

Voici les formules utilisées :

Excel ( 3376 jours )
= DATEDIF(AUJOURDHUI();"03/01/2018";"d")

Visual Basic ( 3375 jours )
Dim firstDate As Date
firstDate = #1/3/2018#
Me.Label1.Text = DateDiff(DateInterval.Day, Now, firstDate) & "
jours."
Quelqu'un aurait-il une explication sur cette différence ?

Merci et bonne journée.

Hello,

moi j'obtiens aussi 3376 avec Visual Basic:

Dim d As Date


d = CDate("03/01/2018")

MsgBox DateDiff("d", Now, d)


Cordialement;

--
Jean-marc Noury (jean_marc_n2)
Microsoft MVP - Visual Basic
FAQ VB: http://faq.vb.free.fr/
mailto: remove '_no_spam_' ; _no_spam_jean_marc_n2@yahoo.fr

Bonjour,

Y en a peut être un qui ne compte par une extrémité incluse ou le
contraire ?

Et d'une façon générale, il faut passer par le jour Julien (JJ), c'est
la seule méthode indépendante des astronome et mathématiciens qui est fiable
dans tous les cas.

Le JJ

http://mesromans.free.fr/Module1.bas


------
Romans, logiciels, email, site personnel
http://irolog.free.fr/joe.htm
------------------------------------------------------------------------------------
"Thierry" <th.tg@laposte.net> a écrit dans le message de news:
%23Z8CrI9JJHA.2220@TK2MSFTNGP04.phx.gbl...
| Bonjour,
|
| J'ai posé ma question sur le forum Excel mais elle concerne également le
| forum VB.
|
| Selon que j'utilise Excel ou Visual Basic 2008 Express, le nombre de jours
| n'est pas le
| même.
|
| Voici les formules utilisées :
|
| Excel ( 3376 jours )
| = DATEDIF(AUJOURDHUI();"03/01/2018";"d")
|
| Visual Basic ( 3375 jours )
| Dim firstDate As Date
| firstDate = #1/3/2018#
| Me.Label1.Text = DateDiff(DateInterval.Day, Now, firstDate) & " jours."
|
| Quelqu'un aurait-il une explication sur cette différence ?
|
| Merci et bonne journée.
|
|
|

Bonsour® Thierry avec ferveur ;o))) vous nous disiez :

J'ai posé ma question sur le forum Excel mais elle concerne également
le forum VB.
Selon que j'utilise Excel ou Visual Basic 2008 Express, le nombre de
jours n'est pas le même.

Voici les formules utilisées :

Excel ( 3376 jours )
= DATEDIF(AUJOURDHUI();"03/01/2018";"d")

Visual Basic ( 3375 jours )
Dim firstDate As Date
firstDate = #1/3/2018#
Me.Label1.Text = DateDiff(DateInterval.Day, Now, firstDate) & "
jours."

les fonctions EXCEL
pour feuilles de calculs DATEDIF
pour VBA DateDiff
(remarquez le F final en difference)
n'ont aboslument aucun rapport ni en terme de fonctionnalités, ni en terme syntaxe.
par ailleurs DATEDIF est une fonction cachée qui n'est plus documenté dans l'aide depuis au moins Excel 97

par contre l'utilisation de DateDiff sous VBA EXCEL ne devrait causé aucun souci par rapport à VB
VBA étant un sous ensemble de VB



--
--
@+
;o)))

Bonjour et merci à ceux qui m'ont répondu.
La solution : Dans Visual Basic 2008 Express, j'ai remplacé Now par Today
et le résultat concorde alors avec celui d'Excel.
Bonne journée.


"Thierry" a écrit :

Bonjour,

J'ai posé ma question sur le forum Excel mais elle concerne également le
forum VB.

Selon que j'utilise Excel ou Visual Basic 2008 Express, le nombre de jours
n'est pas le
même.

Voici les formules utilisées :

Excel ( 3376 jours )
= DATEDIF(AUJOURDHUI();"03/01/2018";"d")

Visual Basic ( 3375 jours )
Dim firstDate As Date
firstDate = #1/3/2018#
Me.Label1.Text = DateDiff(DateInterval.Day, Now, firstDate) & " jours."

Quelqu'un aurait-il une explication sur cette différence ?

Merci et bonne journée.