Visibilité d'un champ dans un sous formulaire.

Bonjours à tous ...

J'aimerais cacher un champ dans un sous-formulaire tout dépend ce que je rentre comme données dans mon formulaire. Pour faire cela j'ai fait un test puis j'ai mis ce code :

Code:

---

1 2 3

Forms(str_NomFormulaire).Form(str_NomSousFormulaireAlliage)![nom_alliage].Visible = False Forms(str_NomFormulaire).Form(str_NomSousFormulaireAlliage)![zdld_alliage].Visible = True

---

Les variables : str_NomFormulaire et str_NomSousFormulaireAlliage sont remplis avec le nom du formulaire principal et le nom de mon sous-formulaire.

Voici l'erreur que j'ai :

Citation:

---

Erreur d'exécution '2165'
Impossible de masquer le contrôle actif

---

Savez vous pourquoi j'ai cette erreur ???

Comment puis-je fais pour éviter cette erreur ???

Merci de votre aide ...

là tu n'as aucun test si tu veux faire un test utilise le code

Code:

---

if end if

---

exemple

Code:

---

1 2 3 4 5 6

If NomChamp = "CertaineValeur" then   Forms(str_NomFormulaire).Form(str_NomSousFormulaireAlliage)![nom_alliage].Visible = False else Forms(str_NomFormulaire).Form(str_NomSousFormulaireAlliage)![zdld_alliage].Visible = True end if

---

Oui je sais que je n'ai pas de test ... je ne voulais pas mettre trop de code dans mon poste donc j'ai simplement mit les lignes qui posaient problème ...

Merci quand même pour ta réponse ..

Voici mon code (cette fois-ci complet)

Code:

---

1 2 3 4 5 6 7 8 9 10 11

If (Forms(str_NomFormulaire)![casac_NouveauOf] = False) Then   Forms(str_NomFormulaire).Form(str_NomSousFormulaireAlliage)![nom_alliage] = True Forms(str_NomFormulaire).Form(str_NomSousFormulaireAlliage)![zdld_alliage].Visible = False   Else   Forms(str_NomFormulaire).Form(str_NomSousFormulaireAlliage)![nom_alliage] = False Forms(str_NomFormulaire).Form(str_NomSousFormulaireAlliage)![zdld_alliage].Visible = True   End If

---