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'hui168
Hier1770
Cette semaine5499
Ce mois35731
Total depuis 200418238271

2
visiteurs actuellement en ligne

25 avril 2024