Format Date

Bonjour à tous,

Je me prends la tête depuis plusieurs jours, avec le format date sur VBA.

J’ai d’abord sélectionné toute la colonne « B » à laquelle j’ai attribué un format « Date » qui me transforme une date affichée par exemple :

Frappe au clavier : 25-2

Affichage sur écran : mardi 25 février 2014

Lorsque je fais une macro et que je tape une date dans une des cellules de la colonne « B », ça ne marche pas.

Exemple :

Frappe au clavier : 25-2

Affichage sur écran : 25-2

Je joins un petit fichier.

Quelqu’un pourrait-il m’aider.

D’avance merci

Claude17430

Bonjour

Essaie

Sub Macro1()
    ActiveCell.Select
    ActiveCell.Value = InputBox("Tapper la Date", "Date", Date)
    ActiveCell.Value = Format(ActiveCell.Value, "dddd dd mmmm yyyy")
End Sub

Cordialement

bonjour,

tout simplement:

sub d()
ActiveCell.Value = Format(InputBox("Tapper la Date", "Date", Date), "dddd dd mmmm yyyy")
end sub