Supprimer le ruban dans Access 2007

Résolu
DevGl Messages postés 151 Statut Membre -  
f894009 Messages postés 17413 Statut Membre -
Bonjour,

j'ai réalisé ma base de donée sous access 2007, et je veux quand un utilisateur ouvre ma base , il ne voit que le menu principale qui s'ouvrent directement , pas de volet de navigation , pas de ruban , (la barre qui contien : acceuil , outils base de donée , ... ) ,
alors j'ai pu grace a l'option access ---> base de donée active de supprimer le volet de navigation , maintenant quand j'ouvre ma base je ne voie que le menu principal et le ruban ,
mais moi je ne veux pas voire le ruban :/ :/ !!
comment faire pour le masquer ??? pour que je ne voie que le menu principaal :/
j'ai vu pas mal de tutoriel mais ils sont en access 2010 !! pas de 2007 !
aidez moi s'il vous plaaaaaaait
A voir également:

1 réponse

f894009 Messages postés 17413 Statut Membre 1 715
 
Bonjour,


'masque Ruban
Private Sub Cmd_no_ribon_Click()
DoCmd.ShowToolbar "Ribbon", acToolbarNo
End Sub

'affiche Ruban
Private Sub Cmd_Ruban_on_Click()
DoCmd.ShowToolbar "Ribbon", acToolbarYes
End Sub

'Cache Volet de navigation
Private Sub Cmd_Windows_Click()
DoCmd.NavigateTo "acNavigationCategoryObjectType" 'Select Navigation Pane
DoCmd.RunCommand acCmdWindowHide 'Hide selected
End Sub

'Affiche Volet de navigation
Private Sub Cmd_Windows_Affiche_volet_Navigtion_Click()
DoCmd.SelectObject acTable, , True
End Sub
0
DevGl Messages postés 151 Statut Membre
 
comment je vais le faire s'il vous plaait??? ou je dois mettre ce petit code??? je créer un formulaire ou quoi??
0
f894009 Messages postés 17413 Statut Membre 1 715
 
Bonjour,

Le code fournit est un exemple avec des boutons de commande. Pour vous,

'code a mettre a l'activation ou ouverture du formulaire qui s'ouvre le premier:
DoCmd.ShowToolbar "Ribbon", acToolbarNo
DoCmd.NavigateTo "acNavigationCategoryObjectType" 'Select Navigation Pane
DoCmd.RunCommand acCmdWindowHide 'Hide selected

'code a mettre a la fermeture de la base si besoin:
DoCmd.ShowToolbar "Ribbon", acToolbarYes
DoCmd.SelectObject acTable, , True
0