Discussion :

[froutloops62]

J'ai un formulaire feuille mode de données.

dans ce formulaire j'ai un champ minutes

dans l'evenement sur entrée de ce champ :

Code :

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

1
2
3
4
5
6
7
Private Sub En_Nbre_Min_Enter()
    Dim stDocName As String
    Dim stLinkCriteria As String
 
    stDocName = "Convertisseur"
    DoCmd.OpenForm stDocName, , , stLinkCriteria
End Sub

le formulaire Convertisseur s'affiche, avec un calcul simple, j'ai un résultat qui s'incrémente.

j'ai mis un bonton transfet de résultats avec évenement sur clik :

Code :

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

1
2
3
4
Private Sub Transfert_Résultat_Click()
Forms![Commande1]![Lot Requête]![Réalisation_sous_formulaire]![En Nbre Min] = Me.Conversion
 
End Sub

Me. conversion est le champ résultats à afficher dans le formulaire feuille de données.

Le résultat s'affiche bien mais problème je n'arrive plus à tabuler pour aller sur le champ suivant.

Il faut que je clique sur le champ suivant pour sortir.

Le Problème est que j'ai un code sur l'evenement du champ qui s'incrémente automatiquement.

Code :

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

1
2
3
Private Sub En_Nbre_Min_AfterUpdate()
Me.Objectif = IIf(Me.Cadence >= Forms![Commande1]![Lot Requête]![Objectif Demandé], "Atteint", "Non Atteint")
End Sub

et qui automatise un autre champ "Me.objectif"

si je clique l'opération fonctionne plus.

Où se trouve mon erreur ???

[froutloops62]

j'ai solutionné le problème de l'opération en changeant l'évenement et en le mettant sur un autre champ :

Code :

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

1
2
3
Private Sub Cadence_GotFocus()
Me.Objectif = IIf(Me.Cadence >= Forms![Commande1]![Lot Requête]![Objectif Demandé], "Atteint", "Non Atteint")
End Sub

Mais au transfert de résultat le champ reste toujours bloqué à la tabulation.

Je sais il y a juste à cliquer sur le champ suivant mais je suis assez maniaque alors ça m'embête.

Quelqu'un a une idée ???