[AC-2010] Intitulé de message [Résolu]

[dulph]

bonjour,

j'ai une demande pour mettre en forme de façon lisible les valeurs à renseigner par l'utilisateur de l'application. Je m'explique.

J'ai crée un formulaire croisé dynamique qui est lié à une requête avec une variable à saisir. Lorsqu'on ouvre le formulaire croisé apparait la messagebox qui demande la valeur. Mais il apparait juste le titre du champ sans autres commentaires (voir image). Comment modifier cette messagebox pour mettre une petite phrase lisible.

Merci d'avance

[ClaudeLELOUP]

Bonjour,

À l'ouverture, fais appel à une inputbox
- qui te permet de mettre un titre, une icône...
- saisir la valeur.

Loge la valeur saisie dans une variable globale.
Écris une fonction qui récupère le contenu de cette variable.
Modifie la source du formulaire pour qu'elle se réfère à cette fonction au lieu de la variable actuelle.

[dulph]

Merci Claude,

étant novice complet en VBA, à quoi pourrait ressembler un tel script VBA ?

[marot_r]

Tu peux en effet faire comme le sugère Claude voici une solution possible :

dans un module

Code :

1
2
3
4
5
public dateParam as date
 
public function LireDate() as date
    lireDate=dateParam
end function

dans ta requête tu mets LireDate() là où tu utilises le résultat de l'écran de saisie.

et il te faut une ligne de code pour appeler le InputBox

Code :

dateParam=InputBox("Entrez la valeur")

Personnellement je ferai plutôt un formulaire de saisie ou j'entrerai la date puis je mettrai [forms]![NomTonFormSaisie]![DateParam] là où tu utilises le résultat de l'écran de saisie.

L'intérêt principal que j'y vois c'est que dans un formulaire tu peux faire des contrôle sur ce que tape l'utilisateur. Avec un InputBox() l'utilisateur peut mettre n'importe quoi, une date, sa liste d'épicerie, le prénom de sa mère :-).

A+

[ClaudeLELOUP]

La solution de marot_r, que je salue, est encore meilleure !