Recherche

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

France 72,6% France
Canada 7,2% Canada
Belgique 4,0% Belgique

Total:

123

Pays
018328273
Aujourd'hui: 16
Hier: 427
Cette semaine: 852
Semaine dernière: 2.756
Ce mois: 3.991