Discussion :

[Jeanne38]

Bonjour,

Jusqu'à présent je suis arrivée à faire une barre de menu personnalisée avec 3 menus : Fichier, Gestion, RA.
J'aimerais mettre des sous-menus à chacun de ces menus, mais je n'y arrive pas : je fais pourtant comme ils disent dans l'Aide, avec des Groupes, mais soit j'ai des messages d'erreur, soit j'ai des menus vides.
Je craque !!
Quelqu'un pourrait-il m'expliquer comment on fait,étape par étape ?
Merci !

[Admin]

des sous-menus ?
si je comprends tu veux dire quend tu ouvres ton menu et descend sur un ligne tu as une petite fleche à droite avec un nouveau menu.

c'est très simple, quand tu es dans l'ecran "personaliser" (la ou tu défini tes menus), tu te mets sur la ligne tout en bas "Nouveau Menu" et au lieu de la mettre sur la barre de menu tu la descend dans un menu.

Je suis pas clair...

[Jeanne38]

Nan pas tout à fait ...

Je veux 3 menus : Fichier, Gestion, RA
Sous le menu Fichier, je veux Quitter
Sous le menu Gestion, je veux Collaborateurs, Activités, Mois
Sous le menu RA je veux : Compléter, Statistiques.

Et hélas dans mon formulaire d'acceuil, j'ai juste Fichier, Gestion, RA ... avec rien en dessous ... un petit carré gris ...

J'ai créé ma barre de menu avec une macro et la commande "AjouterMenu" mais ensuite pour ajouter les commandes en dessous (pas les sous-menus, pardon pour le lapsus), je ne sais pas ...

[Admin]

ah ok !

dans l'onglet "Commande" de la fenetre "personnaliser"...

catégorie "Fichier"
tu as un champ à droite "Personalisé" tu le déplace dans ton menu.

[Admin]

ensuite tu fais bouton droit dessus pour changer le libellé et assigner une fonction dessus.

bon courage à toi

[Jeanne38]

En fait je veux une barre de menu personnalmisée et UNIQUEMENT celle-là !
Je ne veux plus de la barre Access.

Dans mon formulaire, j'ai mis le nom de ma macro dans la propriété "Barre de menu".

Donc J'ai 3 menus : Fichier (qui n'a rien à voir avec le menu Fichier d'Access), Gestion et RA.
Et en dessous je veux mettre mes propres commandes.

Ca va donner ça :

Fichier Gestion RA
Quitter Collaborateurs Saisie
Activites Statistiques

Mais si j'ai les 3 menus, je n'ai pas du tout les commandes en dessous.
Je passe par des Macros, avec la commande "AjouterMenu".

[Admin]

je doit pas etre réveillé, j'ai du mal à comprendre tous les posts aujourd'hui !

Bref, ton menu comment tu l'as créé ?

[Jeanne38]

Bon finallement je suis passée par la personnalisation des menus ...
(j'ai créé une nouvelle barre et j'ai fait glisser les raccourcis des macros dedans)

J'ai essayé de passer uniquement par de la programmation "Macro", mais ça ne marche pas.

Il me reste encore la barre de Menu Access, en plus de la mienne : comment la faire disparaitre ? Je n'arrive pas à décocher la case "Barre de menus" du menu "Options -> Personnaliser" ...

Merci de ta patience

[Admin]

moi je fais une boucle sur tout les menus :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Public Function open_application()
 
Dim i As Integer
 
For i = 1 To Application.CommandBars.Count
    DoCmd.ShowToolbar Application.CommandBars.item(i).name, acToolbarNo
Next
    DoCmd.SelectObject acTable, , True
    DoCmd.RunCommand acCmdWindowHide
DoCmd.ShowToolbar "Menu Général Faconnier", acToolbarYes
 
End Function

ca vire TOUS les menus

[Jeanne38]

La barre était tout simplement non autorisée en "masquage", ce qui empêchait de décocher la case.

Pb résolu !
Encore merci !