Bonjour,
Je fais ça:
date_num_sem = Val(Text1(0)) & "/" &
Val(Text1(1)) & "/" & Val(Text1(2))
ns = Format(date_num_sem, "ww")
If ns = 0 Or ns = 53 Then ns = 1
------------
dim date_num_sem as date
Mon année est val(text1(2)))
Mon résultat = ns
------------
PROBLEME
Quand ma date devient - négative, la variable
date a une petite indigestion, ainsi que le "ww"
du numéro de semaine !!!
Y voyez-vous un remède mathématique, une ruZe
???
Bonjour,
Je fais ça:
date_num_sem = Val(Text1(0)) & "/" &
Val(Text1(1)) & "/" & Val(Text1(2))
ns = Format(date_num_sem, "ww")
If ns = 0 Or ns = 53 Then ns = 1
------------
dim date_num_sem as date
Mon année est val(text1(2)))
Mon résultat = ns
------------
PROBLEME
Quand ma date devient - négative, la variable
date a une petite indigestion, ainsi que le "ww"
du numéro de semaine !!!
Y voyez-vous un remède mathématique, une ruZe
???
Bonjour,
Je fais ça:
date_num_sem = Val(Text1(0)) & "/" &
Val(Text1(1)) & "/" & Val(Text1(2))
ns = Format(date_num_sem, "ww")
If ns = 0 Or ns = 53 Then ns = 1
------------
dim date_num_sem as date
Mon année est val(text1(2)))
Mon résultat = ns
------------
PROBLEME
Quand ma date devient - négative, la variable
date a une petite indigestion, ainsi que le "ww"
du numéro de semaine !!!
Y voyez-vous un remède mathématique, une ruZe
???
Bonjour,
Je fais ça:
date_num_sem = Val(Text1(0)) & "/" &
Val(Text1(1)) & "/" & Val(Text1(2))
ns = Format(date_num_sem, "ww")
If ns = 0 Or ns = 53 Then ns = 1
------------
dim date_num_sem as date
Mon année est val(text1(2)))
Mon résultat = ns
------------
PROBLEME
Quand ma date devient - négative, la variable
date a une petite indigestion, ainsi que le "ww"
du numéro de semaine !!!
Y voyez-vous un remède mathématique, une ruZe
???
--
Merci beaucoup, au revoir et à bientôt :o)
------
Romans, logiciels, email, site personnel
http://irolog.free.fr/joe.htm
------------------------------------------------------------------------------------
Bonjour,
Je fais ça:
date_num_sem = Val(Text1(0)) & "/" &
Val(Text1(1)) & "/" & Val(Text1(2))
ns = Format(date_num_sem, "ww")
If ns = 0 Or ns = 53 Then ns = 1
------------
dim date_num_sem as date
Mon année est val(text1(2)))
Mon résultat = ns
------------
PROBLEME
Quand ma date devient - négative, la variable
date a une petite indigestion, ainsi que le "ww"
du numéro de semaine !!!
Y voyez-vous un remède mathématique, une ruZe
???
--
Merci beaucoup, au revoir et à bientôt :o)
------
Romans, logiciels, email, site personnel
http://irolog.free.fr/joe.htm
------------------------------------------------------------------------------------
Bonjour,
Je fais ça:
date_num_sem = Val(Text1(0)) & "/" &
Val(Text1(1)) & "/" & Val(Text1(2))
ns = Format(date_num_sem, "ww")
If ns = 0 Or ns = 53 Then ns = 1
------------
dim date_num_sem as date
Mon année est val(text1(2)))
Mon résultat = ns
------------
PROBLEME
Quand ma date devient - négative, la variable
date a une petite indigestion, ainsi que le "ww"
du numéro de semaine !!!
Y voyez-vous un remède mathématique, une ruZe
???
--
Merci beaucoup, au revoir et à bientôt :o)
------
Romans, logiciels, email, site personnel
http://irolog.free.fr/joe.htm
------------------------------------------------------------------------------------
Bonjour,
Je fais ça:
date_num_sem = Val(Text1(0)) & "/" &
Val(Text1(1)) & "/" & Val(Text1(2))
ns = Format(date_num_sem, "ww")
Bonjour,
Je fais ça:
date_num_sem = Val(Text1(0)) & "/" &
Val(Text1(1)) & "/" & Val(Text1(2))
ns = Format(date_num_sem, "ww")
Bonjour,
Je fais ça:
date_num_sem = Val(Text1(0)) & "/" &
Val(Text1(1)) & "/" & Val(Text1(2))
ns = Format(date_num_sem, "ww")
Bonjour,
Ben... ben... une année inférieure à 1 :o)
Bonjour,
Ben... ben... une année inférieure à 1 :o)
Bonjour,
Ben... ben... une année inférieure à 1 :o)
Bonjour,
Ben... ben... une année inférieure à 1 :o)
Bonjour,
Ben... ben... une année inférieure à 1 :o)
Bonjour,
Ben... ben... une année inférieure à 1 :o)
Bonjour,
Je fais ça:
date_num_sem = Val(Text1(0)) & "/" &
Val(Text1(1)) & "/" & Val(Text1(2))
ns = Format(date_num_sem, "ww")
Bonjour,
Je fais ça:
date_num_sem = Val(Text1(0)) & "/" &
Val(Text1(1)) & "/" & Val(Text1(2))
ns = Format(date_num_sem, "ww")
Bonjour,
Je fais ça:
date_num_sem = Val(Text1(0)) & "/" &
Val(Text1(1)) & "/" & Val(Text1(2))
ns = Format(date_num_sem, "ww")
LE TROLL a écrit, le 14/03/2008 18:33 :Bonjour,
Je fais ça:
date_num_sem = Val(Text1(0)) & "/" &
Val(Text1(1)) & "/" & Val(Text1(2))
ns = Format(date_num_sem, "ww")
Bonjour,
Petite remarque pas tout-à-fait dans le sujet : sur une machine
française, cette fonction va chercher le jour dans Text1(0) et le mois
dans Text1(1).
ns = DateSerial(Val(Text1(2), Val(Text1(1), Val(Text1(0))
en ayant cette fois bien pris soin de préciser que Text1(2) contient
l'année, Text1(1) le mois, et Text1(0) le jour.
Reste à adapter à ce qu'on a à faire, mais en règle générale il est
préférable, dans une application potentiellement multiculturelle, de
générer les dates par DateSerial, dont l'ordre des paramètres est
définitif, plutôt que par la conversion d'une chaîne de caractères,
dont l'interprétation dépend des paramètres du panneau de
configuration.
En espérant que ça aide, sinon à répondre à la question, du moins à
éviter de tomber dans un gros panneau.
LE TROLL a écrit, le 14/03/2008 18:33 :
Bonjour,
Je fais ça:
date_num_sem = Val(Text1(0)) & "/" &
Val(Text1(1)) & "/" & Val(Text1(2))
ns = Format(date_num_sem, "ww")
Bonjour,
Petite remarque pas tout-à-fait dans le sujet : sur une machine
française, cette fonction va chercher le jour dans Text1(0) et le mois
dans Text1(1).
ns = DateSerial(Val(Text1(2), Val(Text1(1), Val(Text1(0))
en ayant cette fois bien pris soin de préciser que Text1(2) contient
l'année, Text1(1) le mois, et Text1(0) le jour.
Reste à adapter à ce qu'on a à faire, mais en règle générale il est
préférable, dans une application potentiellement multiculturelle, de
générer les dates par DateSerial, dont l'ordre des paramètres est
définitif, plutôt que par la conversion d'une chaîne de caractères,
dont l'interprétation dépend des paramètres du panneau de
configuration.
En espérant que ça aide, sinon à répondre à la question, du moins à
éviter de tomber dans un gros panneau.
LE TROLL a écrit, le 14/03/2008 18:33 :Bonjour,
Je fais ça:
date_num_sem = Val(Text1(0)) & "/" &
Val(Text1(1)) & "/" & Val(Text1(2))
ns = Format(date_num_sem, "ww")
Bonjour,
Petite remarque pas tout-à-fait dans le sujet : sur une machine
française, cette fonction va chercher le jour dans Text1(0) et le mois
dans Text1(1).
ns = DateSerial(Val(Text1(2), Val(Text1(1), Val(Text1(0))
en ayant cette fois bien pris soin de préciser que Text1(2) contient
l'année, Text1(1) le mois, et Text1(0) le jour.
Reste à adapter à ce qu'on a à faire, mais en règle générale il est
préférable, dans une application potentiellement multiculturelle, de
générer les dates par DateSerial, dont l'ordre des paramètres est
définitif, plutôt que par la conversion d'une chaîne de caractères,
dont l'interprétation dépend des paramètres du panneau de
configuration.
En espérant que ça aide, sinon à répondre à la question, du moins à
éviter de tomber dans un gros panneau.
Bonjour, oui, bon, ça, c'est le problème
des anglais...
Bonjour, oui, bon, ça, c'est le problème
des anglais...
Bonjour, oui, bon, ça, c'est le problème
des anglais...