Envoyer la date avec le mois en lettre
Fermé
kgigant
-
20 avril 2011 à 08:50
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 15 mars 2023 - 20 avril 2011 à 09:43
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 15 mars 2023 - 20 avril 2011 à 09:43
A voir également:
- Envoyer la date avec le mois en lettre
- Dans le texte, un seul mot a réellement été écrit en lettres capitales (majuscules). quel est ce mot ? ✓ - Forum Word
- Excel mois en lettre ✓ - Forum Excel
- Iphone 14 date de sortie - Guide
- Triez la liste comme sur cette illustration (attention, on ne voit que le début …). quel est le mot formé par les 6 dernières lettres de la colonne code ? - Forum Excel
- Whatsapp la date est incorrecte ✓ - Forum Mobile
2 réponses
Mike-31
Messages postés
18188
Date d'inscription
dimanche 17 février 2008
Statut
Contributeur
Dernière intervention
13 mars 2023
5 041
20 avril 2011 à 09:20
20 avril 2011 à 09:20
Salut,
Colles ta macro dans un post ou modifie la ligne qui doit formater la cellule dans ce format
NumberFormat = "dd/mm/yyyy"
remplace par
NumberFormat = "dd/mmmm/yyyy"
Colles ta macro dans un post ou modifie la ligne qui doit formater la cellule dans ce format
NumberFormat = "dd/mm/yyyy"
remplace par
NumberFormat = "dd/mmmm/yyyy"
pijaku
Messages postés
12263
Date d'inscription
jeudi 15 mai 2008
Statut
Modérateur
Dernière intervention
15 mars 2023
2 712
20 avril 2011 à 09:43
20 avril 2011 à 09:43
Bonjour,
Certainement un problème de déclaration du type de ta variable. Si tu déclares ta date "As Date", tu n'auras pas le bon format. Déclares la "As String".
Essaie voir ce pitit test :
En A1 écrit ta date au format : jj/mmmm/aaaa puis lance cette macro :
Certainement un problème de déclaration du type de ta variable. Si tu déclares ta date "As Date", tu n'auras pas le bon format. Déclares la "As String".
Essaie voir ce pitit test :
En A1 écrit ta date au format : jj/mmmm/aaaa puis lance cette macro :
Sub test()
Dim madate As Date
Dim madate2 As String
madate = Range("A1")
madate2 = Range("A1")
madate = Format(madate, "dd/mmmm/yyyy")
madate2 = Format(madate2, "dd/mmmm/yyyy")
MsgBox madate
MsgBox madate2
End Sub