VBA macro messagebox

Bonjour,
J'aimerai effectuer une petite macro qui, en l'executant, demande à l'utilisateur de rentrer une date, et que cette date soit stockée dans la cellule B2 de le feuil1.
Pouvez vous m'aider ?
Merci
Configuration: Windows XP
Firefox 3.0.14

3 réponses

  1. De rien!

    pense à mettre en résolu!
    0
    1. oui!
      on peut.

      Sub saisieladate()
      Dim MaDate As Date

      MaDate = CDate(InputBox(" Saisissez une date SVP jj/mm/aaa", "Saisie de la date", Date))
      Range("B2").Value = MaDate

      End Sub
      1