Discussion :

[Tipstitou]

Bonjour,

Je dispose d'un champ numérique, dont je paramétre le masque de saisie ainsi :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

#### " mn"

Le but est que l'utilisateur tape, par exemples :

- 15, qui renvoie : 15 mn
- 115, qui renvoie : 115 mn
- 1115, qui renvoi : 1115 mn

Sur une table, cela fonctionne parfaitement, de même qu'en mode feuille de données.

Bizarrement, dans le champ d'un formulaire, en reprenant mes exemples, cela donne, les tirets symbolisant des espaces :

- 15, qui renvoie : 15-- mn
- 115, qui renvoie : 115- mn
- 1115, qui renvoi : 1115 mn

C'est moche !

Mon champ est pourtant paramétré de la même façon que dans mon formulaire en mode feuille de données.
Et l'aide access dit bien, avec "#" : "positions vides converties en espaces en mode édition, mais les espaces sont effacés lors de la sauvegarde des données"



Quelqu'un aurait-il une piste pour m'aider à paramétrer correctement ce champ ?

[loufab]

Bonjour,

mn tel quel indique que tu souhaites afficher le mois et n les minutes d'une date/heure. Donc le comportement est normal.

Pour écrire du littéral il te faut utilise le back-slash, comme ceci.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

? format("15","## \m\n")

Pour une propriété format c'est identique.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

"## \m\n"

Le F1 t'aurais expliqué la même chose.

Cordialement,

[Tipstitou]

Bonjour Loufab,

J'avais testé avec format sans le back-slash.
Le hic, c'est qu'ensuite, cela m'enregistre... du texte dans un champ numérique et que cela m'embête ensuite, puisque j'utilise les données de ce champs pour toute une série de calculs.

Je vais tester avec le back-slash, mais je ne suis pas bien sûre, sur ce coup-là...

[Tipstitou]

Suite !

Je confirme ce que je craignais.
Si j'utilise un masque de saisie, je n'ai aucun souci pour enregister mon champ numérique.

Si j'utilise format, j'ai une jolie petite fenêtre qui me dit que

le type ne correspond pas

Retour à la case départ !!!

[Tipstitou]

J'ai trouvé une solution.
C'est du bricolage, mais ça fonctionne...

Donc :

Sur Réception focus de mon champ, je code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
   'Suppression masque de saisie
    If MonChamp.InputMask <> "" Then MonChamp.InputMask = ""

Sur Après MAJ, je code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
   'Maj du masque de saisie
    If Len(MonChamp) = 1 Then MonChamp.InputMask = "# mn"
    If Len(MonChamp) = 2 Then MonChamp.InputMask = "## mn"
    If Len(MonChamp) = 3 Then MonChamp.InputMask = "### mn"
    If Len(MonChamp) = 4 Then MonChamp.InputMask = "#### mn"
    If Len(MonChamp) = 5 Then MonChamp.InputMask = "##### mn"

Sur Perte focus, je code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
   'Maj du masque de saisie
    If Len(MonChamp) = 1 Then MonChamp.InputMask = "# mn"
    If Len(MonChamp) = 2 Then MonChamp.InputMask = "## mn"
    If Len(MonChamp) = 3 Then MonChamp.InputMask = "### mn"
    If Len(MonChamp) = 4 Then MonChamp.InputMask = "#### mn"
    If Len(MonChamp) = 5 Then MonChamp.InputMask = "##### mn"

Heureusement, il est peu probable que quelqu'un note 6 millions de minutes, parce que sinon, je suis mal !!!

[loufab]

Format ou masque de saisie utilisent la même syntaxe c'est pour cela que je t'ai indiqué cette fonction.

Si tu inscris dans masque de saisie : 9999 \m\n

ça fonctionne.

[Tipstitou]

Euh...
Bon, je ne dois pas être douée avec les masques de saisie.
Il faut dire que je les utilises peu.

Quand j'essaie de noter

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

9999 \m\n

Access modifie tout seul en

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

9999" mn"

Donc mon problème n'est pas réglé.

J'ai essayé

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

"9999 \m\n"

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

[9999 \m\n]

qui est modifié automatiquement en

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

\[9999" mn]"

idem avec parenthèses au lieu de crochets...

Je dois donc louper quelque chose...