Date du jour en nombre/valeur

luli -  
 foo -
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.


A voir également:

4 réponses

Gyrus Messages postés 3334 Date d'inscription   Statut Membre Dernière intervention   526
 
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 1265 Date d'inscription   Statut Membre Dernière intervention   577
 
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 6445 Date d'inscription   Statut Contributeur Dernière intervention   824
 
Bonjour

Ou vous pouvez utiliser ceci

=CNUM(D3)

la cellule D3 contenant la date jj/mm/aa
0
foo
 
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