Discussion :

[mlww]

Bonjour,

j'arrive bien a trouvé le jour dans une formule de cellule,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=AUJOURDHUI()-DATE(ANNEE(AUJOURDHUI());1;0)

mais je n'en viens pas a bout en vba

si quelqu'un m'aider

merci

[unparia]

Bonjour
compare :
section dans laquelle tu as ouvert cette discussion :

Accueil > Index du forum > Logiciels > Microsoft Office > Excel

avec

mais je n'en viens pas a bout en vba

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
MsgBox Date - DateSerial(Year(Date), 1, 1)
MsgBox Date - CDate("01/01/" & Year(Date))
MsgBox DateDiff("d", CDate("01/01/" & Year(Date)), Date)
MsgBox DateDiff("d", DateSerial(Year(Date), 1, 1), Date)

[Pierre Fauconnier]

Ne pas oublier d'ajouter 1...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

myDate - DateSerial(Year(myDate), 1, 1) + 1

[mlww]

Merci infiniment messiers de votre aide