Convertir une date (JJ/MM/AAAA) encodée dans une InputBox en format nombre ?

2 réponses
Avatar
Jean-Pierre
Bonjour,
Pour mon code, je voudrais convertir une date (JJ/MM/AAAA) encod=E9e dans u=
ne InputBox en format nombre (Selection.NumberFormat=3D"0")
Je vous remercie de votre r=E9ponse !
Cordialement,

2 réponses

Avatar
Jacquouille
Bonjour
trouvé cela dans mes archives .....
[a1] = Format([a1], "# ###")

Pourquoi ne formates-tu pas la cel de destination ?



Jacquouille

" Le vin est au repas ce que le parfum est à la femme."
"Jean-Pierre" a écrit dans le message de groupe de discussion :


Bonjour,
Pour mon code, je voudrais convertir une date (JJ/MM/AAAA) encodée dans une
InputBox en format nombre (Selection.NumberFormat="0")
Je vous remercie de votre réponse !
Cordialement,
Avatar
Jacquouille
Oups, oublié
Sub Changer_date_en_Num_de-Serie()
zzz=résultat de l'inpute box
[A1]=zzz
Range("A1").NumberFormat = "0"
End Sub

Jacquouille

" Le vin est au repas ce que le parfum est à la femme."
"Jacquouille" a écrit dans le message de groupe de discussion :
4fec72cd$0$3116$

Bonjour
trouvé cela dans mes archives .....
[a1] = Format([a1], "# ###")

Pourquoi ne formates-tu pas la cel de destination ?



Jacquouille

" Le vin est au repas ce que le parfum est à la femme."
"Jean-Pierre" a écrit dans le message de groupe de discussion :


Bonjour,
Pour mon code, je voudrais convertir une date (JJ/MM/AAAA) encodée dans une
InputBox en format nombre (Selection.NumberFormat="0")
Je vous remercie de votre réponse !
Cordialement,