Mes dates "s'anglicisent" avant le 13ème jour du mois !!!!!
CLAVERELI
Messages postés
56
Statut
Membre
-
eriiic Messages postés 25847 Date d'inscription Statut Contributeur Dernière intervention -
eriiic Messages postés 25847 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
Je rentre une date à partir d'un USF sous Excel 2007 en espérant la retrouver telle quelle en col. A2 de ma feuille Excel.
Sauf que jusqu'au 12 du mois elles s'affichent au format anglais "mm/dd/yyyy" par exemple 10/12/2012 pour 12/10/2012 attendu!
Question :
Quel code rentrer pour obtenir un report de ma date correct
Où rentrer ce code: Dans celui du bouton VALIDER de mon USF
Dans le module général
Ailleurs, où?
Cette question à été sûrement déjà traitée sur le site mais la "foultitude" de réponses avoisinantes ont fini par décourager mes recherches.
Merci d'avance et sans mesure à qui apportera LA SOLUTION.
Je rentre une date à partir d'un USF sous Excel 2007 en espérant la retrouver telle quelle en col. A2 de ma feuille Excel.
Sauf que jusqu'au 12 du mois elles s'affichent au format anglais "mm/dd/yyyy" par exemple 10/12/2012 pour 12/10/2012 attendu!
Question :
Quel code rentrer pour obtenir un report de ma date correct
Où rentrer ce code: Dans celui du bouton VALIDER de mon USF
Dans le module général
Ailleurs, où?
Cette question à été sûrement déjà traitée sur le site mais la "foultitude" de réponses avoisinantes ont fini par décourager mes recherches.
Merci d'avance et sans mesure à qui apportera LA SOLUTION.
A voir également:
- Mes dates "s'anglicisent" avant le 13ème jour du mois !!!!!
- Nombre de jours entre deux dates excel - Guide
- Mise a jour chrome - Accueil - Applications & Logiciels
- Mise a jour windows 10 - Accueil - Mise à jour
- Mettre a jour chromecast - Accueil - Guide TV et vidéo
- Youtube premium 2 mois gratuit - Accueil - TV & Vidéo
3 réponses
Bonjour,
Prenez ce qui vos convient
Bonne suite
Prenez ce qui vos convient
Private Sub CommandButton1_Click()
Dim ddate As Date
ddate = TextBox1
Worksheets("feuil1").Range("A1") = TextBox1
Worksheets("feuil1").Range("A2") = ddate
End Sub
Bonne suite
Bonjour et merci eriiic
Où dois-je insérer cette simple ligne?
Je ne connais rien aux bases du VBA et je travaille sur mon projet à tâtons et par l'aide apportée par des personnes comme toi.
Merci de me dire à quel endroit de mon code je dois insérer ta formule.
Bien cordialement
Où dois-je insérer cette simple ligne?
Je ne connais rien aux bases du VBA et je travaille sur mon projet à tâtons et par l'aide apportée par des personnes comme toi.
Merci de me dire à quel endroit de mon code je dois insérer ta formule.
Bien cordialement
