Discussion :

[LyLy_91]

Bonjour,

La question peut paraitre idiote, mais j'ai un peu de mal avec le code VBA.

En fait j'ai une case à cocher dans un sous formulaire qui est désactivée.
Quand je clique sur un bouton de mon formulaire, je voudrais activer la case à cocher de mon sous formulaire et c'est la que je bloque sur le code.

Code :

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

1
2
3
Forms![nomFormulaire]![nomSousFormulaire]!caseacocher.Enabled = True
ou
[nomFormulaire].[nomSousFormulaire].[caseacocher].Enabled = True

Pour un formulaire, j'aurais mis

Code :

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

Me.caseacocher.Enabled = True

Mais pour le sous formualire, je ne sais pas la syntaxe.
Quelqu'un peux m'aider?

Merci d'avance

[moilou2]

Ba je pense que c'est:

Si tu est hors du formulaire:

Code :

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

Form_NomDuFormulaire.NomDuSousFormulaire.TonObjet.Enabled = True

Si tu est dans le formulaire:

Code :

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

Me.NomDuSousFormulaire.TonObjet.Enables=True

Voila

[LyLy_91]

Bonjour,

Merci pour la

[LyLy_91]

Oups,

Je disais merci pour la réponse.
Mais cela ne fonctionne pas.

Code :

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

Me.[sfm_temp_of].[chk_temp_of].Enabled = True

Erreur de compilation. Membre de méthode ou de données introuvable.

[LyLy_91]

J'ai regarder la FAQ et la solution est

Forms![NomFormulaire]![NomSousFormulaire].Form![MaCaseACocher]

Cependant j'ai un message d'erreur
Erreur d'exécution "2465"
Impossible de trouver le champs "Nomsousformulaire" auquel il fait référence dans votre expression.

Quelqu'un peut-il m'aider, car je bloque.
Merci
LyLy

[Renardo]

En principe sa devrais donnée cela

Code :

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

Forms![NomSousFormulaire].[MaCaseACocher].enabled=true

ou

Code :

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

Forms![NomSousFormulaire]![MaCaseACocher].enabled=true

Remplace NomSousFormulaire par son nom reel idem pour MaCaseACocher

[LyLy_91]

Bon en fait il y avait un problème déjà avec mon sous formulaire, car je lui avais modifié son nom dans renommer formulaire, mais pas dans les propiétés.

Donc j'ai trouvé le bon code et cela fonctionne.

Code :

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

1
2
Forms![NomForm]![NomSousForm].SetFocus
    Me.Form!NomSousForm!CaseACocher.Enabled = True

Mais cela ne résout pas mon problème de base, mais bion je vais trouver autre chose. (problème que je n'ai pas énoncé).
Si je trouve pas je l'énoncerais.

Merci à vous.