user_mobilelogo

Voici une macro qui va remplacer le format de la date sélectionnée par un autre format. Dans cet exemple, vous obtiendrez un format avec le mois en toutes lettres. Mettez cette macro dans le Normal.dotm et affectez un raccourci clavier pour pouvoir la lancer rapidement.

 

Sub date_longue()
Dim madate As String
madate = Format(Selection, "dd mmmm yyyy")
MsgBox madate
Selection.Range = madate
End Sub

Le format se règle via le code "dd mmmm yyyy". Vous pouvez ainsi choisir le format qui vous convient.

Pour utiliser cette macro, sélectionnez la date dans votre document et lancez la macro.

Statistiques

Aujourd'hui1057
Hier3162
Cette semaine14307
Ce mois35023
Total depuis 200411611142

50
visiteurs actuellement en ligne

13 décembre 2019