Afficher une question (Msg box?) puis copier la réponse dans une cellule

[daronne]

Bonjour à tous,
j'ai besoin de vos lumières pour compléter une macro que j'ai créé.
J'aimerais savoir comment on affiche une fenêtre avec une question où l'on peut répondre, puis comment copier la réponse qui a été donnée dans une cellule de mon fichier excel?

J'espère que ma question est assez complète pour que vous puissiez m'aider.

Merci d'avance


Rémi

 

[phlaurent55]

Re : Afficher une question (Msg box?) puis copier la réponse dans une cellule

Bonjour Rémi,

avec ceci:

[A1] = InputBox("quelle est la date de ........ ?")
mettra la réponse entrée dans la cellule A1 de la feuille active

à+
Philippe

 

[phlaurent55]

Re : Afficher une question (Msg box?) puis copier la réponse dans une cellule

Re,

ou ceci:

[A1] = InputBox([A3])
posera la question qui se trouve en A3 et mettra la réponse en A1

à+
Philippe

 

[Hippolite]

Re : Afficher une question (Msg box?) puis copier la réponse dans une cellule

Bonjour Rémi,
Bonjour Philippe,

Et si tu veux améliorer l'ordinaire, il y a inputboxplus qui est compatible Access/Excel.

A+