Discussion :

[rj450]

Bonjour,

J'ai besoin d'aide pour réaliser une condition en VBA.

Cette condition doit soit rendre visible des boutons d'un formulaire soit les rendre invisible. La condition est liée à l'utilisateur qui se connecte.

J'ai une table avec les utilisateurs et via la fonction CurrentUser, j'ai une requête (qConnected) qui me donne l'information sur laquelle faire la condition, c'est un champ calculé (Adm) qui donne soit la valeur "YES" soit la valeur "NO". Sur base de "YES", j'affiche les boutons et sur base d'un "NO", ils sont invisibles.

Donc, ça devrait donner à peu près ça:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
If (ma condition si c'est "YES") then
 
Me.bttBatiment.Visible = True
Me.BttChauffeurs.Visible = True
Me.bttDirections.Visible = True
 
Else (ben si c'est pas "YES")
 
Me.bttBatiment.Visible = False
Me.BttChauffeurs.Visible = False
Me.bttDirections.Visible = False
endif

Puis-je avoir un peu d'aide?

Merci

[nico84]

Bonjour,
Je ne vois pas bien ce que tu ne sais pas faire !?
Voici par exemple une syntaxe si adm est une string :

Code :

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

Me.bttBatiment.Visible = (adm="YES")

Si adm est un booleen :

Code :

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

Me.bttBatiment.Visible = adm

Ensuite copie du 1er sur les autres :

Code :

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

1
2
Me.BttChauffeurs.Visible = Me.bttBatiment.Visible
Me.bttDirections.Visible = Me.bttBatiment.Visible

[rj450]

Ha, ben désolé si c'était si évident.

Je teste ça lundi et je reviens.

Merci pour le coup de main, ça n'a l'air de rien mais ça m'aide bien.

Je suis plus à l'aise sur java.

Mais j'suis débutant hein, 2ième année de bachelier (promotion sociale) et aucune connaissance en vba. Le java s'est pour l'école et le vba pour l'employeur. J'ai rien d'autre.

[rj450]

Bonjour,

Désolé, ça ne fonctionne pas.

Je vais tenter d'être plus clair.

J'ai un formulaire qui n'est lié à aucune table, aucune requête, il ne contient que des boutons.

Sur ce formulaire, je dois appliquer une condition qui rend certains boutons visible (ou pas) sur base d'une requête (qConnected). Je dois donc faire la condition sur une requête qui n'est pas liée au formulaire.

Voilà, j'espère que j'ai été plus précis.

Merci

[Tofalu]

condition qui rend certains boutons visible (ou pas) sur base d'une requête (qConnected).

Euh, ça ne veut rien dire

Une condition ne peut se baser sur une requête. Elle peut etre baser sur le résultat d'une requête retourné dans un champ pour une ligne mais dans ce cas, il est nécessaire d'avoir le nom du champ et la condition permettant d'isoler la ligne.

[rj450]

Heu, exact.

J'ai une requête qui donne une et une seule ligne et dont un champ donne une valeur (yes ou no) type texte.

La requête se nomme 'qConnected' et le champ se nomme 'Administrateur'.

La condition est que certains boutons doivent être visibles uniquement si le résultat de la requête donne la valeur 'yes' dans le champ 'Administrateur'.

En pseudo code:
Si qConnected!Administrateur = "YES" alors MonBoutton.visible=vrai.