Discussion :

[djefff75]

Bonjour à tous,

J'ai un nouveau problème à vous soumettre...

Pour faire simple : J’ai un formulaire, avec un sous formulaire en mode continu. Le sous-formulaire contient deux éléments : Une case à cocher et un champ texte. Selon les enregistrements la case à cocher est vrai ou faux, et la valeur qu’elle prend je voudrais que le champ texte soit disponible ou non !

J’ai donc appliquer le code suivant "sur ouverture" du sous formulaire

Code :

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

1
2
3
4
5
6
 
If Me.(”ACOCHER”) = True Then
    Me("TEXTE").Enabled = True
Else
    Me("TEXTE ").Enabled = False
End If

Je sais que cette question à déjà été évoqué le forum et Keita m’a déjà aidé à résoudre ce problème sur un état en appliquant mon code sur l’événement "au formatage" mais cet événement n’existe pas sur un formulaire !!

Connaissez-vous la méthode la plus simple ??

Merci à tous ceux qui prendront le temps de m’aider à résoudre ce problème

[Heureux-oli]

Essaye de le mettre on current du formulaire.

[boubignole]

salut

Désactive ta zone de texte et met ton code sur l'évènement Apres mise a jour de la case a cocher

[Heureux-oli]

Si j'ai bien lu, la case à cocher est soit vrai ou fausse avant.

[djefff75]

Merci à vous pour vos réponses mais ca ne marche pas ...
soit toutes les zones texte sont activée soit elles sont toutes désactivées ... mais ca ne marche pas en fonction de la valeur de la case à coher !!

en effectuant la boucle pas à pas je me rend compte :

- pour le 1er cas que si par exemple y a 5 enregsitrements disponibles, le if ne passe qu'une fois ce n'est donc pas surpprenant que ca ne marche pas !!

- pour le 2nd cas que la case à cocher n'est pas mise à jour sur l'ouverture !

Mais que faire ??!

[boubignole]

soit toutes les zones texte sont activée soit elles sont toutes désactivées

ton code n'est pas bon

essaye

Code :

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

1
2
3
4
5
If Me.CaseAcocher = -1 Then
    Me.zoneDeTEXTE.Enabled = True
Else
    Me.zoneDeTEXTE.Enabled = False
End If

[djefff75]

ca ne marche pas mieux sur quel evenement ou control dois-je placer le code ? et dans le formulaire ou sous-formulaire ?

[Heureux-oli]

Pourquoi ne pas faire deux sous formulaires.
Un pour les cases cochées et un pour les pas cochées.

[boubignole]

ce code doit peut être sur l'évènement apres mise à jour du controle case à cocher

[djefff75]

parceque mon formulaire doit afficher tous les enregsitrements et selon qu'un enregistrement réponde à une condition (casa à cocher = vrai) alors je veux rendre disponible une zone texte ...

c'est si compliqué que ca ??

[Heureux-oli]

Je pense que oui.
Si c'est un formulaire continu ou un datasheet, la propriété est activée sur condition mais pour toutes les lignes visibles.

[djefff75]

surprenant !!!

[Arkham46]

slt,

si access >= 2000, voir la mise en forme conditionnelle

[djefff75]

je suis bien sous access 2000 et ai envissagé cette solution mais le problème est que ma mise forme porte sur un champ différent de celui de la condition !

[Arkham46]

pas grâve:
- tu sélectionnes ton champs texte
- tu vas dans mise en forme condtionnelle
- tu choisis Expression
- tu mets comme condition : [TaCaseAChocher]=Faux
- et tu déselectionnes "Activé" dans les boutons du format pour désactiver la zone texte quand la case est décochée

EDIT : d'ailleurs c'est dans le tuto sur la MFC :
http://warin.developpez.com/access/mfc/#L2.4.2

[djefff75]

super Arkham46 t'es tout simplement GENIAL !!

Merci à tous pour vos idées !!

[boubignole]

sinon je viens de tester le code que j'ai donné, il marche très bien même en feuille de donnée...

[djefff75]

pour info tu le mets sur le form sous form ou quel objet et sur quelle événement ?

[boubignole]

faut croire que j'ai pas suffisament testé...
ça marche pas bien

pourtant j'avais fait un truc pareil qui marchait dans le temps.
J'essayerai de retrouver ça demain

bonne nuit tous