vba et date

vba et date - VB/VBA/VBS - Programmation

Marsh Posté le 02-08-2004 à 11:14:12    

Salut!
 
J'ai trois variables jour, mois, annee et je voudrait en faire une date.
 
j'ai essayé pleins de trucs du style DATE(annee,mois,jour) mais ca ne marche pas...
 
 
qqn aurait une idée?
 
merci

Reply

Marsh Posté le 02-08-2004 à 11:14:12   

Reply

Marsh Posté le 02-08-2004 à 17:21:28    

Date tout court suffit, il le renvoit la date. Si tu veux inverser, tu utilises les fonctions qui te permettent de manipuler les chaines de caractère et tu la remets comme tu veux !

Reply

Marsh Posté le 02-08-2004 à 17:37:45    

j'explique un peu mieux:
 
dim annee as integer, mois as integer, jour as integer
dim date_calculs as date
 
pour récupérer une date j ai essayè de faire:
 
date_calculs = DATE(annee, mois, jour)
 
mais ca ne marche pas....


Message édité par skelter le 02-08-2004 à 17:38:39
Reply

Marsh Posté le 02-08-2004 à 17:41:42    

skelter a écrit :

j'explique un peu mieux:
 
dim annee as integer, mois as integer, jour as integer
dim date_calculs as date
 
pour récupérer une date j ai essayè de faire:
 
date_calculs = DATE(annee, mois, jour)
 
mais ca ne marche pas....


 
Normal ! si tu veux la date directement :

Code :
  1. Dim RecupDate as date
  2. RecupDate  = date()
  3. msgbox(RecupDate) 'afficher la date du jour


 
Si tu veux la découper, tu utilises les fonctions left, right, mid. Vb, renvoie les date par la fonction DATE qui existe déjà et qu'es un mots clé reservés sous forme de "chaine de caractère" : "00/00/0000" !
 
 :jap:

Reply

Marsh Posté le 03-08-2004 à 09:29:54    

dsl mais gt vraiment pas trés clair....
en fait je ne veux aps récupérer la date, je veux initialiser une date:
par exemple le 01/01/2001
 
dim date_millennaire as date
 
et ensuite je voudrais que date_millennaire ait la valeur "01/01/2001"
 
 
j'ai essayé en faisant
 
     year(date_millennaire) = 2001
     month(date_millennaire) = 1
     day(date_millennaire) = 1
 
mais ca ne marche pas..
 
 
merci encore


Message édité par skelter le 03-08-2004 à 09:51:11
Reply

Marsh Posté le 03-08-2004 à 09:53:15    

skelter a écrit :

dsl mais gt vraiment pas trés clair....
en fait je ne veux aps récupérer la date, je veux initialiser une date:
par exemple le 01/01/2001
 
dim date_millennaire as date
 
et ensuite je voudrais que date_millennaire ait la valeur "01/01/2001"
 
merci encore


dans ce cas là, c'est encore plus simple !  

Code :
  1. dim ValDate as string
  2. ValDate = "00/00/0000"


 
La valeure que tu souhaite y mettre ! le mots date te renvera la date courante du jour...Essaye aussi avec ValDate as Date, ca doit fonctionner aussi ;)

Reply

Marsh Posté le 03-08-2004 à 10:34:55    

merci!
 
mais en fait mon problème était le suivant: je veux construire la date "01/01/a" ou a est une variable
 
en fait  avec ta méthode ca marche:
 
Dim d As Date
Dim a As Integer
 
a = 2003
 
d = "01/01/" & a

Reply

Marsh Posté le 03-08-2004 à 10:39:38    

skelter a écrit :

Salut!
 
J'ai trois variables jour, mois, annee et je voudrait en faire une date.
 
j'ai essayé pleins de trucs du style DATE(annee,mois,jour) mais ca ne marche pas...
 
 
qqn aurait une idée?
 
merci


t'étais pas loin:
 
madate = cdate(annee & "-" & mois & "-" & jour)
 
madate étant de type date.


---------------
Whichever format the fan may want to listen is fine with us – vinyl, wax cylinders, shellac, 8-track, iPod, cloud storage, cranial implants – just as long as it’s loud and rockin' (Billy Gibbons, ZZ Top)
Reply

Marsh Posté le 03-08-2004 à 12:05:51    

thx!

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed