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'hui2
Hier1873
Cette semaine3675
Ce mois36769
Total depuis 200417934242

3
visiteurs actuellement en ligne

21 février 2024