Code VBA pour une date

[Gollum]

bonjour à tous,

lorsque j'utilise la formule ci-dessous formule pour modifier la date de mise à jour dans un bouton qui active une macro, la date s'inscrit avec l'heure.

y a-t'il un format a mettre au bout de l'intruction Now() pour n'avoir que la date dans le style ##/##/####

ActiveSheet.Shapes("Button 1").Select
Selection.Characters.Text = "Etat" & Chr(10) & "Mise a jour le:" & Chr(10) & Now()

merci pour votre aide

 

[Spitnolan08]

Re : Code VBA pour une date

Bonsoir,

Normalement si ta cellule de réception est formatée avec le bon format dans ta feuille Excel, la saisie d'une date via ta macro ne devrait pas modifier le format.
Donc appliquer le bon format à la cellule de réception est le plus simple...
Sinon il faut utiliser la fonction Format :

 Selection.Characters.Text = Format("Etat" & Chr(10) & "Mise a jour le:" & Chr(10) & Now(),"dd/mm/yyyy")

Non testé mais qui devrait répondre à la question.

Cordialement

 

[Pierrot93]

Re : Code VBA pour une date

Bonjour Gollum, salut Spitnolan

autre solution, tu peux remplacer "now" par "date".

bonne soirée
@+

 

[Gollum]

Re : Code VBA pour une date

Merci beaucoup Pierrot93

c'est tout a fait ce que je voulais et c'est tellement évident...
pourquoi faire compliqué quand c'est tout simple


encore merci