Date du jour en nombre/valeur

Fermé
luli - 9 mai 2014 à 17:05
 foo - 9 mai 2014 à 18:11
Bonjour,

Je cherche une fonction qui permette d'avoir la date d'aujourd'hui (AUJOURDHUI() sous excel et DATE() sous VBA) mais en valeur (ex : 09/05/2014 => 41768 ).
Mon but sera de l'intégrer dans une macro.

Merci de votre aide.


4 réponses

Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 523
9 mai 2014 à 17:12
Bonjour,

Tu n'as pas besoin de fonction puisque la date est en réalité identifiée par sa valeur (numéro de série).

Exemple :
Avec la date du 09/05/2014 en A1.
L'instruction Range("B1").Value = Range("A1").Value + 10
renvoie la date du 19/05/2014 en B1

A+
0
g Messages postés 1262 Date d'inscription vendredi 23 avril 2004 Statut Membre Dernière intervention 15 mai 2017 572
9 mai 2014 à 17:26
Bonjour,

Copie le code ci-dessous dans un module de feuille, clique deux fois dans une cellule et met la cellule au format standard. tu verras que "Date" renvoie la valeur 41768.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
ActiveCell = Date
End Sub

Cordialement.
0
PHILOU10120 Messages postés 6368 Date d'inscription lundi 16 avril 2012 Statut Contributeur Dernière intervention 22 avril 2024 796
9 mai 2014 à 17:40
Bonjour

Ou vous pouvez utiliser ceci

=CNUM(D3)

la cellule D3 contenant la date jj/mm/aa
0
Bonjour

en vba

Sub TestDate()
Range("A1").Value = DateValue(Now)
Range("B1").Value2 = Range("A1").Value2 + 10
End Sub

Sub TestDate1()
Range("A1").Value = DateValue(Now)
Range("B1").Value2 = Range("A1").Value2 + 10
Range("B2").Value2 = DateValue(Now) + 10
End Sub

a toi de choisir
A+
Maurice
0