Bonsoir,
On m'a cité ? On voudrait que je travaille un dimanche ?!!!?
Alors vite fait (pour du 64 bits) sinon ôter les PTRsafe.
Il faut :
- déclarer dans un module une variable publique de nom RepMSGBOX
- dans ce module, on définit la sub maMsgbox(ByVal xcaption As String, Optional xdefault As String) où xcaption est le texte à à afficher au-dessus de la boite de saisie et xdefault est la valeur par défaut de la saisie (on peut s'en passer)
- Le résultat de la saisie est dans la variable publique RepMSGBOX.
Pour quitter la boite de dialogue, on peut:
- cliquer sur la croix rouge => annulation de la saisie)
- taper sur la touche Escape (Echap) => annulation de la saisie
- cliquer sur la coche verte => validation de la saisie
- tapez sur la touche entrée quand on est dans la zone de saisie => validation de la saisie
Quand on annule, la variable RepMSGBOX contient la valeur FALSE.
Quand on valise la saisie, la variable RepMSGBOX contient la saisie.