[access] champ visible sur condition

Question

Bonjour, je suis nouveau sur ce forum et je demande le secours des spécialistes en access. Je crée une base de données de gestion de meubles (tables, formulaires) jusque là pas de pb. Dans un formulaire, j'ai deux champs : un champ "Catégorie" et un champ "Hauteur d'assise". Je souhaite faire apparaître le champ "Hauteur d'assise" quand le champ "Catégorie" contient la valeur "Siège". J'ai écrit le code suivant dans la propriété  après MAJ du champ "Catégorie" :If [Catégorie] = "Siège" Then[Hauteur d'assise].Visible = TrueElse[Hauteur d'assise].Visible = FalseEnd IfCela ne fonctionne pas car ça s'applique à tous les enregistrements de la table et ça ne reste pas en mémoire sur l'enregistrement concerné.Comment faire ? Je vous remercie pour votre aide précieuse

Utilisateur anonyme · Accepted Answer

Bonjour,il faut également mettre ce code sur l'évènement current() du formulaire.

Renaissance · Answer

Ok, ça marche.Merci beaucoup pour la rapidité de la réponse.Cordialement.

domik · Answer

bonjour,
je profite de cette discussion car j'ai moi aussi  un peu le même probleme:
 si la valeur du champ =" toto", je veux faire apparaitre ou disparaitre une boitexxx qui entoure ou n'entoure pas une partie d'un texte dans mon formulaire 

j'ai utiliser un code identique:

me.boitexxx.Visible = False 
If [Champ] = "toto" Then 
me.boitexxx.Visible = True 
else
me.boitexxx.Visible = False
End If 

pour voir la boite xxx apparaitre  ou disparaitre, je dois me positionner sur le champ qui contient "toto" sinon rien ne se passe ...
mon formulaire est en mode continue, si je change d'enregistrement sans etre positionné sur le champ je n'ai pas l'effet espéré.
 avez vous une idée ?

domik · Answer

je ne suis pas tres experimenté...

j'ai fais:  
dans proprietés ,l'onget évenement , 
apres MAJ [Procédure événementielle] et  la j'ai recopié le code.

peux tu me dire ce qu'est : l'évèment current() du formulaire 

merci

Utilisateur anonyme · Answer

Quand tu es dans VBA (où tu as mis le code), choisi l'objet form (ou formulaire) dans la liste en haut à gauche, choisis l'évènement current dans la liste en haut à droite. Recopies le code...

domik · Answer

Dans la liste en haut à droite tout ce que je vois c'est:
After update, beforeupdate, change, click ...etc
je ne vois pas ce fameux "évènement current"
de plus je suis deja sous l'objet form . C'est la que le code est copié.

fallait il le copier ailleur avant ? comment?
 peux tu me donner un peu + d'explications pour un novice...
merci

Utilisateur anonyme · Answer

Sous quelle version d'access ?
Mais tu *dois* avoir current()

Regardes une copie d'écran : https://www.cjoint.com/?lEq5IhTDlu

romstek31 · Answer

jé le mm probleme jé mi mon code ds current et je ve ke si une date n'est pas saisi alor mon champ est activé sinon non et ça marche pa :s 

Private Sub Form_Current()
    If [dateValidPlanMinute] = Not Null Then
        [remarqueNonValid].Enabled = True
    Else
        [remarqueNonValid].Enabled = False
    End If

End Sub

younes · Answer

slt tt le monde, je suis nouveau sur le forum
j'ai un prob avec les combobox en fait je voudrai afficher une liste selon une autre liste, plus precisement:
en choisissant un element d'une combo  les elements de la deuxieme combo doivent changer j'ai essaye avec une requete mais ca ne marche pas.  et ceci dans le meme formulaire (access2003)

Utilisateur anonyme · Answer

Bonjour,

Ceci devrait t'aider : https://grenier.self-access.com/?post/2007/09/05/Listes-deroulantes-liees

A+

Breizhinours35 · Answer

Bonjour, trois ans plus tard....

je suis tout nouveau sous acces mais super motivé!

je travail sous acces pour de la gestion de matériel. la base à déjà été faote mais pas par moi.

je voudrai rajouter à la base ceci : quand sur un formulaire je coche une "case à cocher", il m'affiche un texte. si la case n'est pas coché il ne l'affiche pas.

Autre condition : Sur mon formulaire principal, j'ai tous les textes qui sont affichés, histoire que je m'y retourve. Quand je coche danc ce formulaire la case correspondante, je veux que àa s'affiche sur un état créé exprès.

J'ai déjà créé ma table et mon formulaire ansi que mon état mais là je suis un peu dépassé par les requêtes et relations... j'ai besoin d'un petit coup de main....

Merci à vous pour vos réponses

Breizhinours35 · Answer

Salut et merci pour ces premiers infos... j'y voi splus claire

le soucis c'est que, voici ce que j'iamerai faire dans l'idéal : 

j'ai un formulaire qui fait parti d'une base déjà construite.

Sur ce formulaire j'ai des cases à cocher avec le titre des cases par exemple : 

chkbox 1 : repas
chkbox 2 : hotel
chkbox3 : déplacement

Je veux choisir dans ce formulaire ce que je veux qu'il s'affiche mais sur un état corrrespondant et non pas sur le formulaire. Le texte décrit sur l'état est plus complet que sur le formulaire. du style "prévoir 5 repas"

Avec le code que tu m'a donné, cela rend visible sur le formulaire. et plus encore, cela le rend en fait invisible et il ne réaparrai plus ensuite. Je souhaiterai que cela fasse aussi l'effet inverse.

encore mieux, j'aimerai que si je coche la case 2, les repas s'affiche en haut de l'état et non pas au milieu.

merci pour ton aide

Utilisateur anonyme · Answer

Re,

A mon avis, il y a déjà un souci de conception...

Pour l'effet inverse comme tu dis, le code que je t'ai donné doit fonctionner. Evidemment sur le formulaire.

Dis nous ce que tu as comme tables et à quoi sert la base de données, bref, ce que tu veux qu'elle gère.

A+

Breizhinours35 · Answer

heu... ce serai un peu long à décrire car ce n'est pas moi qui ai conçu la base. il y a 50 tables et autant de formulaires et de requêtes si ça se trouve....

J'explique : 

La base a été crée pour gérer de la location de matériel. En gros, gérer un fichier client, gérer le stoc du matériel, éditer des devis et factures....

Je veux faire un devis. J'ouvre donc un formulaire sur lequel je rentre mon client, mes produits... et j'édite le devis (état)

tout cela fonctionne bien mais je veux en plus de ça, dans mon formulaire rajouter ces fameuses petites cases qui font que je les coches ou non. pluis j'appuye sur un bouton et ça me sort l'état correspondant avec le texte de la case 1 et 3  qui s'affiche parce que j'ai coché la case 1 et 3 et le texte de la case 2 qui ne s'affiche pas parce que je n'ai pas coché la case 2 pour ce devis précis.


bon ça à l'air peut être un peu compliqué comme ça mais ça me serai très utile...

merci

Utilisateur anonyme · Answer

Ce que je te propose c'est de m'envoyer ta base de données zippée.
Si tu as peur pour tes données (je ne suis un truand lol), fais en une copie et vides les tables "sensibles".

Je verrai mieux de "visu" car là c'est flou !

Mon mail est dans mon profil.

Par contre, je ne pourrai regarder ça avant lundi après-midi, là je pars en week-end.

A+

Breizhinours35 · Answer

J'apprécie sincèrement ton aide mais je ne peux t'envoyer la base de donnée car en fait elle fait partie d'un logiciel avec code d'acces? donc si je te l'envoie tu ne pourra pas l'ouvrir....


Dis moi si je suis sur la bonne piste : 


dans la table de mon formulaire devis j'ai "nom, prénom... (du client) ; AN8, PT4... (qui correspondent au produit, tarif...) ....
j'ai rajouté dans cette table plusieurs colonnes case à cocher que j'ai nomé VCHEK1, VCHEK2, VCHEK3, VCHEK4

Dans mon formulaire j'ai fait "ajouter un champ existant" et j'ai glissé à partir de ma table VCHEK1, VCHEK2...


puis je créé un état et c'est dans cet état que dois s'afficher le texte correspondant à la case VCHEK1 si je l'ai cohché. et c'est là que je n'arrive pas.... de plus je souhaiterai que si je choche la case 1 et 3, le texte correspondant dans l'état s'affcihe l'un à la suite de l'autre, sans un gros trou au milieu où il y arai le txt 2

voilà voilà et encore merci

Utilisateur anonyme · Answer

Bonjour,

A première vue, si je m'en tiens exactement à ce que tu me dis, tu as une table devis avec des codes produits dedans ?
Si c'est le cas, ça sent l'usine à gaz.

Mais bon, tu n'as peut-être pas le temps de refaire une base de A à Z.

Dans ton état, tu peux, comme dans ton formulaire, créer du code pour afficher / masquer des objets (contrôles).

Dans l'état en mode création, fais un clic droit puis créer le code évènement, générateur de code.
Tu choisis l'évènement open() et là tu mets le code qui va bien, du genre :
if vchek2=true then
me.texte3.visible=true
.....
else 
me.texte3.visible=false
.....
end if

A adapter bien sûr.

Pour le "gros trou au milieu" comme tu dis, je ne vois pas trop comme ça si réellement tu as une seule table devis. L'utilisation de sous-états était toute indiquée.
Sinon, mais c'est franchement crade, tu peux utiliser avec le code si dessus le positionnement de tes objets.
Donc, si ton texte3 n'est pas visible, il faut "remonter" ton texte4, avec ses propriétés :
if vchek2=true then
me.texte3.visible=true
me.texte4.top=   
....

Mais c'est crade...

Donnes moi la structure de tes tables, il y a peut-être plus simple.

A+

Mii · Answer

Bonjour,

j'ai moi aussi un problème en voulant rendre un champ visible sur condition.
Le champ reste visible quelle que soit la condition.
Voici mon code, en espérant que quelqu'un puisse m'aider.

Private Sub Form_Current()
    If EMPLOI = "Chômeur" Then
        nivrequis.Visible = False
    Else
        nivrequis.Visible = True
    End If
End Sub

Private Sub nivrequis_BeforeUpdate(Cancel As Integer)
    If EMPLOI = "Chômeur" Then
        nivrequis.Visible = False
    Else
        nivrequis.Visible = True
    End If
End Sub

tili67 · Answer

Bonjour,

j'ai un probleme similaire mais sous word.

J'ai créé un formulaires et j'aimerai que lorsque la personne remplisse celui-ci mes champs case a cocher puissent être interactives.

je m'explique à la question: matière du produit il y a le choix entre Acier ou inox et j'aimerai que la personne qui rempli la case ne puisse que mettre une seul croix. (soit l'un soit l'autre et non les deux)

Merci

Laura Holt · Answer

Bonjour,

Mon problème m'a fait venir sur cette discussion. Je vois que certains d'entre vous maîtrise access (quelle chance) et j'ai besoin de votre précieuse aide.

J'ai une base de données "contrat" comprenant plusieurs tables (infos, coordonnées, facturation, planning, date etc.). J'ai créé des formulaires et sous formulaires de saisie regroupant les données afin de rendre la saisie plus simple pour mes utilisateurs.
Par ailleurs, certains contrats ont été résiliés et je ne souhaite pas supprimer la fiche mais uniquement la masquer en utilisant une case à cocher par ex. actif ou inactif. Tout en pouvant les retrouver en cliquant sur un bouton "afficher les contrats inactifs".

Je sais qu'il est possible de masquer les fiches "inactive" par le biais d'une requête. Mais mes enregistrements sont établis directement par plusieurs tables.

Je n'ai encore établi aucune macro sur ma base. Je ne maitrise pas les macro sur Access (mais je me débrouille sur Excel)

Est-ce possible ?

Merci.
LH

PS : connaissez vous un site expliquant les formules du langage SQL ? Merci.

François35 · Answer

Je reviens à nouveau sur ce post...

j'ai un autre soucis, mais de même niveau...

toujours dans la même base.

Dans mon formulaire devis, lorsque je rentre un produit, je veux qu'en fonction du produit rentré il apparaisse soit sur l'état ''devis" soit sur l'état ''bon de livraison'' soit les deux...

j'ai donc créé 2 cases à cocher sur mes articles. une pour ''apparaitre sur devis'' une pour ""apparaitre sur BL''

J'ai fait clic droit sur la case puis ''créer code événement'' et j'ai rentré : 

if [Ab2]=true then
me! États![P_Devis#Devis#]![AbsMontant].Visible = true
else
me![Ab2].visible=false

légende : [Ab2] c'est ma case à cocher
[AbsMontant] c'est ce qui doit s'afficher ou non et qui se trouve sur l'état P-Devis#Devis#


Je ferme et  lorsque je clique sur la case à cocher de l'article il me met :

Microsoft Office Access ne peut pas trouver la macro if [Ab2]=true then
me! États![P_Devis#Devis#]![AbsMontant].
La macro (ou son groupe de macros) n'existe pas ou la macro est nouvelle mais n'a pas été enregistrée.
Remarquez que lorsque vous entrez la syntaxe nomgroupemacro.nommacro dans un argument, vous devez spécifier le nom sous lequel le groupe de macros de la macro a été enregistré pour la dernière fois.

puis il me coche quand même la case mais sans changer l'état devis...

Bref, je suis un peu largué.... merci à ceux qui voudrons bien éclaircir mon problème.

Fab · Answer

Salut à tous, 

Juste pour vous remercier vos nombreux conseils sur ce post m'ont aidés à solutionner mon problème sans poser de question. A savoir, afficher des champs lorsqu'une case est cochée.

très simple finalement : 

1 - clic droit sur la case à cocher - créer code évènement
2 - encoder ceci (avec vos noms champs bien entendu) 

If nom_de_la_case_à_cocher = True Then 'si la case est cochée
Me!champs_à_supprimer.Visible = True 'on affiche la zone texte1
Else
Me!Emplacement.Visible = False
End If

3 - sélectionnez Form dans la liste de choix au dessu à gauche et "current" dans la liste de choix de droite de VBA et recopiez exactement le même code 

If nom_de_la_case_à_cocher = True Then 'si la case est cochée
Me!champs_à_supprimer.Visible = True 'on affiche la zone texte1
Else
Me!Emplacement.Visible = False
End If

à+

Fab

Fab · Answer

pardon je corrige le code :

If nom_de_la_case_à_cocher = True Then 'si la case est cochée
Me!champs_à_cacher.Visible = True 'on affiche la zone texte1
Else
Me!champs_à_cacher.Visible = False
End If

Fabrice · Answer

Bonjour à tous,

J'ai également un souci avec un formulaire continu dans lequel j'ai une image que je souhaite afficher (ou pas) selon la valeur du champ S1. (si S1<0, afficher l'image)

J'ai entré le code suivant  (access 2002)

Private Sub Form_Current()
If [S1] < 0 Then
[alerte].Visible = True
Else
[alerte].Visible = False
End If
End Sub

Le problème est que l'affichage est identique pour l'ensemble des enregistrements...Si je sélectionne une valeur négative d'un des enregistrements, l'image s'affiche bien mais pour l'intégralité des enregistrements (même ceux dont le champ S1 est >0). J'ai appliqué vos différents conseils, mais ca ne fonctionne pas !

Merci d'avance à ceux qui prendront le temps de m'aider, et bravo à tous pour la qualité de vos réponses 

Cdt

Klyslane · Answer

Bonjour à tous,

J'ai un problème similaire aux vôtres mais les solutions proposées ne marchent pas...

J'édite des factures pas Access 2010. L'état va chercher les infos nécessaires dans les formulaires remplis préalablement.

J'ai 3 cases qui ne doivent s'afficher seulement si elles sont différentes de 0 et je n'y arrive pas.

Je fais clique droit, créer un évènement, générateur de code. Je tape çà :
Private Sub Quantité_achat_pour_vente_Enter()
If Quantité_achat_pour_vente <> 0 Then
Quantité_achat_pour_vente.Visible = True
Else
Quantité_achat_pour_vente.Visible = False
End If
End Sub

Et donc quand j'ouvre mon état il me met un message d'erreur car dans les propriétés de mon champ j'ai visible = OUI. Mon seul autre choix est NON et je suis obligée de laisser la case remplie.

Une idée ?

Merci merci !

babdoul · Answer

Bonjour,  

Je fais un programme dans access 2003 pour la gestion d'un parc automobile.   

J'aimerai savoir comment faire pour intégrer le plan d'amortissement des véhicules qui s'intitule comme suit:   

date d'acquisition : DA  

date de Valeur : DV  

Coût d'Acquisition : CA  

DV1 = DA + 365 jours  

CA1 = 75%*CA  

DV2 = DV1 + 365 jours  

CA2 = 50% *CA  

DV3 = DV2 + 365 jours  

CA3 = 25% * CA  

DV4 = DV3 + 365 jours  

CA4 = 0% * CA  

Votre aide me serait très précieuse.

[access] champ visible sur condition

26 réponses

Discussions similaires

Newsletters