DATE

[coyote]

Hello,

J'envisage de travailler sur des variables dates en VBA

Alors j'ai bien assimilé les fonctions Now, weekday, Month, Year, days etc......

Toutefois je bloque pour cette mise en oeuvre (rien trouvé dans l'aide en ligne)
Voilà l'équivalent en formule EXCEL à convertir en VBA
=DATE($A$1;$A2;B$1) (A1 étant l'année; A2 le mois et B1 le jour)


Une solution batarde serait de la laisser sous EXCEL et récupérer la valeur sous VBA mais NNAAANNNNNnnnnnn j'envisage JUSTE de tester (if) cette date dans une boucle avec un décalage (offset) donc il y aurait trop de variables intermédiaires dans la feuille EXCEL.

 

[Michel_M]

Salut Coyote,

La fonction DATE n'existe pas en VBA (excel 2000). Dans l'aide MS tu as la "liste des fonctions Excel utilisables en VBA", (je viens de tomber dessus en cherchant autre chose, j'avais demandé worksheetfunction). Bien sûr, histoire de s'occuper un peu, il faut ensuite trouver la traduc in english.

Amicalement et bon dimanche
Michel

 

[coyote]

Merci tout de même...vais travailler alors avec une variable intermédiaire sous EXCEL

 

[LaurentTBT]

Bonjour à tous.

Coyote, Michel, est-ce que DateSerial ne conviendrait pas?

Dim a as date
a=dateserial(2004,01,11) donne "11/01/04"

et si tu veux le numéro de série correspondant, alors:
Dim b as long
b=format(a,"0")
où directement, b=format(Dateserial(2004,01,11),"0"), qui donne 37997

Bonne journée.
Laurent.

 

[Michel_M]

Boujour Laurent,

Merci pour dateserial que je ne connaissais pas.

A+
Michel

 

[coyote]

Bin vi deuxpeccable même Laurent

Surprenant tout de même que l'aide en ligne VBAne m'a pas trouvé cette fonction avec le mot clé "date"

 

[Roland]

Salut coyote

Je dirait même surprenant
cliquent sur Date dans un module de code j'ai l'aide sur la fonction Date
et cet exemple

Cet exemple utilise la fonction Date pour renvoyer la date système actuelle.

Dim MyDate
MyDate = Date ' MyDate contient la date système actuelle


Amicalement Roland

 

[coyote]

Oui Oui Roland.... tout pareil

Mais avec le mot clé "date" la formule dateserial n'est pas proposé

La date système ne m'intéresse pas.

J'ai une valeur année (numérique) mentionné dans une cellule Excel et je veux renvoyer dans VBA une variable date =01/01/(année dans cellule).

La suggestion de Laurent semble répondre à mes attentes (je n'ai pas encore essayé)

 

[EMG]

Bonsoir, le forum

Excel gére beaucoup de fonction il suffit de faire par exmple en A1 la manip suivante dans la barre des menu (Insertion....Fonction....Date & Heure) ici il y a bien la fonction Date et autre fonction pratique non

@+ Gérard