activer desactiver un bouton dans un formulaire
Bonjour,
Je cherche à activer/désactiver des boutons de commande dans un formulaire sur base de l'utilisateur qui est connecté à la base de donnée. Le formulaire "Menu" est chargé automatiquement à l'ouverture de la db via une macro autoexec. Un champs Text affiche le nom de l'utilisateur "Text76=UserName()" sur base du login windows dans le formulaire Menu. Je voudrais utiliser le contenu du champs Text76 via un SelectCase pour activer/désactiver des boutons de commande dans le formulaire Menu.
Voici le début de code...
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
| Sub Form_Load()
Dim user As String
user = Forms!Menu!Text76
Select Case user
Case Paul
Me.Command57.Enabled = False
Me.Command56.Enabled = False
Me.Command62.Enabled = False
End Select
End Sub |
Merci pour votre aide
