bonjour
j'utilise access 2007 et je souhaite masque au démarage le volet de navigation si l'utilisateur utilise une version access complete et si l'utilsiateur est différent de "adm". Je souhaite aussi supprimer dans les même condition le menu par defaut d'access et le remplace par mon menu "ruban"
j'ai commence ce code mais je n'arrive pas a masque ni le ruban par defaut d'access ni le volet de navigation comment faire??
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15 If SysCmd(SYSCMD_RUNTIME) = 0 Then Dim strUser As String strUser = CurrentUser() If strUser = "adm" Then Else DoCmd.RunMacro "ruban" End If Else DoCmd.RunMacro "ruban" End If
Partager