Discussion :

[lmc71]

Bonjour le forum
Voici quelques temps que je parcours les Forums à la recherche d'un bout de code me permettant d'inclure dans un contrôle (zône texte) dans un formulaire, la valeur saisie dans un inpubox.
Je ne suis pas arrivé à trouver une orientation.
J'utilise ce code que j'ai retrouvé dans mes archives.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Sub ContrôleSaisie()
  Dim vTestSaisie As Variant
 
  vTestSaisie = InputBox(prompt:=" Entrer un nombre", _
  Title:="Nombre membre votant absent")
  If vTestSaisie <> "" Then
    If IsNumeric(vTestSaisie) Then
       DoCmd.GoToControl "Val_Nbr_Absent" & vTestSaisie
        'DoCmd.GoToControl "Nom_Vote" 
    Else
 
    End If
  End If
 
 
End Sub

Je l'ai un peu modifié et je n'arrive pas à modifier la partie (vraie) qui renvoie la valeur saisie dans Inputbox dans le contrôle nommé "Val_Nbr_Absent" du formulaire "Vote". Ce formulaire est ouvert avant l'ouverture de l'Inputbox.
Je suis nul en VBA, mais il me semble qu'il faille atteindre le formulaire avant de vouloir atteindre le contrôle lui même.
Mon souhait est de renseigner le contrôle Val_Nbr_Absent, puis d'atteindre le contrôle Nom_Vote du même formulaire.
Je n'ai pas trouvé le bout de code qui me manque, une idée serait la bienvenue.
Cordialement

[marot_r]

Bonjour.

Le code est probablement quelque chose comme

Code :

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

forms("NomTonForm").Controls("NomTonChampTexte")=TaValeur

La question que je me pose est pourquoi passer par un InputBox quand on a déjà un formulaire ?

A+

[lmc71]

Bonjour Marot
Je te remercie pour ta réponse rapide et opérationnelle. Tout est si simple quand on connait la réponse. il est vrai que pour connaitre il faut apprendre et c'est ce que j'essaye de faire à vos côtés.
Tout fonctionne.
Pour répondre à ta question c'est pour obliger l'opérateur à remplir ce contrôle. Tu vas me dire que j'aurais pu mettre une vérification sur la véracité des données ou non dans le contrôle lors de la réception du focus dans le contrôle suivant.
Tout ça pour le fun et pour m'apprendre.
Cordialement