Bonjour,
J'ai une petite question, j'ai créer un formulaire avec 3 champs indépendant :
Nom du champ_1 : champ_of_independant
Nom du champ_2 : champ_lingot_independant
Nom du champ_3 : fk_description
Dans ce même formulaire, j'ai créer un sous-formulaire avec 1 champ.
Nom du champ_1 du sous-form : fk_alliage_detail
Ce que je cherche à faire c'est:
_________________________________________________________________________________________________________________________________
Si, sur perte focus de : champ_of_independant il n'y a rien dedans, passez au champ : champ_lingot_independant
Si, sur perte focus de : champ_of_independant il a qqch dedans, passez au champ : fk_alliage_detail du sous-formulaire.
Si, sur perte focus de : champ_lingot_independant il n'y a rien dedans, passez au champ : fk_description
Si, sur perte focus de : champ_lingot_independant il a qqch dedans, passez au champ : fk_alliage_detail du sous-formulaire.
_________________________________________________________________________________________________________________________________
Pour faire cela, voici le code que j'ai utilisé :
Sur perte focus du champ : champ_of_independant :
Sur perte focus du champ : champ_lingot_independant :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 If IsNull(var_ChampIndeOf) Then Me.champ_lingot_independant.SetFocus Else Forms(str_NomFormulaire).Form(str_NomSousFormulaireAlliage)![fk_alliage_detail].SetFocus End If
Le problème que j'ai c'est que tout marche par rapport à l'évènement sur perte focus de mon champ : champ_of_independant et pas pour le champ : champ_lingot_independant.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 If IsNull(var_ChampIndeLingot) Then Me.fk_description.SetFocus Else Forms(str_NomFormulaire).Form(str_NomSousFormulaireAlliage)![fk_alliage_detail].SetFocus End If
Je ne comprends pas très bien pourquoi cela marche pour l'un et pas pour l'autre malgré que cela soit presque le même code d'utilisé.
Si vous avez des idées, elles seront les bienvenues ...
Merci de votre aide ...
Partager