OVH Cloud OVH Cloud

fonction cdate

2 réponses
Avatar
balou
j'ai trouv=E9 sur le site excellabo une fonction qui m'a=20
permis de r=E9soudre le probl=E8me du format date.

Mais si dans un userform, je supprime la date,=20
ma ligne vba range("a1").value=3Dcdate(textbox.value) me=20
renvoie une incompatibilit=E9 ???

Doit-on effectuer un if pour v=E9rifier =E0 chaque fois si la=20
date existe ? (sachant que ceci se r=E9p=E8te souvent)

je n'arrive pas nonplus =E0 m'expliquer pourquoi si ma date=20
est au format jj/mm/aa dans a1, elle se transorme en=20
mm/jj/aa dans un textbox ???=20

A que j'ai bien du souci ces derniers temps !!!

merci pour vos r=E9ponses toujours pertinentes

2 réponses

Avatar
Denis Michon
Bonjour Balou,

Est-ce que l'on peut savoir ce que tu inscris dans ton textbox...


Essaie ceci :

'---------------
If IsDate(Me.TextBox1) = True Then
MsgBox CDate(Me.TextBox1)
Else
MsgBox "Format date non reconnu."
End If
'---------------


Salutations!



"balou" a écrit dans le message de news:129e01c38832$2bb09140$
j'ai trouvé sur le site excellabo une fonction qui m'a
permis de résoudre le problème du format date.

Mais si dans un userform, je supprime la date,
ma ligne vba range("a1").valueÍate(textbox.value) me
renvoie une incompatibilité ???

Doit-on effectuer un if pour vérifier à chaque fois si la
date existe ? (sachant que ceci se répète souvent)

je n'arrive pas nonplus à m'expliquer pourquoi si ma date
est au format jj/mm/aa dans a1, elle se transorme en
mm/jj/aa dans un textbox ???

A que j'ai bien du souci ces derniers temps !!!

merci pour vos réponses toujours pertinentes
Avatar
Clément Marcotte
if isdate(textbox1.value) then
range("a1").valueÍate(textbox.value)
else
msgbox "Cela prend une date sinon je plante"
exit sub
end if


"balou" a écrit dans le message de
news:129e01c38832$2bb09140$
j'ai trouvé sur le site excellabo une fonction qui m'a
permis de résoudre le problème du format date.

Mais si dans un userform, je supprime la date,
ma ligne vba range("a1").valueÍate(textbox.value) me
renvoie une incompatibilité ???

Doit-on effectuer un if pour vérifier à chaque fois si la
date existe ? (sachant que ceci se répète souvent)

je n'arrive pas nonplus à m'expliquer pourquoi si ma date
est au format jj/mm/aa dans a1, elle se transorme en
mm/jj/aa dans un textbox ???

A que j'ai bien du souci ces derniers temps !!!

merci pour vos réponses toujours pertinentes