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.