Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1705 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [RESOLU] Personnaliser la barre de menu Access

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[RESOLU] Personnaliser la barre de menu Access

n°1120498
Mariooo
Posté le 15-06-2005 à 11:06:42  profilanswer
 

Bonjour à tous,
 
Mon idée d'origine est de faire ressembler un projet Access le plus possible à un logiciel classique.
 
J'aimerais donc entre autres pouvoir lancer la modification de la barre de menu. Au lieu du Fichier/Edition/Affichage etc habituel, j'aimerais personnaliser en rapport avec le contenu de mon "programme".
 
Pourriez-vous me donner quelques indications ?
 
Merci beaucoup  :jap:


Message édité par Mariooo le 15-06-2005 à 12:37:11

---------------
Dyslexics have more fnu.
mood
Publicité
Posté le 15-06-2005 à 11:06:42  profilanswer
 

n°1120576
Mariooo
Posté le 15-06-2005 à 11:32:04  profilanswer
 

Bon je vois comment créer une barre d'outils personnalisée, je vois comment arranger tout ça pour qu'il n'y ait qu'elle qui s'affiche au démarrage, mais je ne vois pas comment personnaliser le "nom" des commandes. Comment puis-je éviter de choisir directement dans la liste qu'on me propose ?
 
Merci


---------------
Dyslexics have more fnu.
n°1120577
FlorentG
Unité de Masse
Posté le 15-06-2005 à 11:33:17  profilanswer
 

Je ne pense pas que ce soit possible comme ça. Le truc à faire, serait de planquer la barre par défaut, et d'en faire une à toi personnalisée (via un formulaire sans bordure ni bouton de fermeture)

n°1120605
Mariooo
Posté le 15-06-2005 à 11:48:01  profilanswer
 

J'ai sous les yeux un logiciel sous Access qui le fait, qui a remplacé sa barre de menus générale par une barre de menus perso avec des commandes inédites. Mais je n'ai pas possibilité d'aller voir comment cela a été fait. C'est frustrant.
C'est donc possible ! :D


---------------
Dyslexics have more fnu.
n°1120611
FlorentG
Unité de Masse
Posté le 15-06-2005 à 11:52:28  profilanswer
 

C'est un bête formulaire en fait ;)

n°1120663
Mariooo
Posté le 15-06-2005 à 12:36:47  profilanswer
 

OK tout beigne !
Il est impossible de créer des barres de menu générales vraiment perso, donc l'Aide Windows (avec des majuscules) nous conseille de jongler avec des macros (essentiellement à partir de l'action AjouterMenu)
Voili Voilou !
 
Merci FlorentG de m'avoir répondu !


---------------
Dyslexics have more fnu.
n°2155250
yatt92
Posté le 31-08-2012 à 22:36:06  profilanswer
 

slt, en reponse a ta question je pense que j'ai quelque code en VBA qui pour creer une barre de menu.
Voici le code.
Public Sub CreerMenu()  
 
Dim Cmb As Office.CommandBar  
Dim btn As Office.CommandBarButton  
Dim SubCmb As Office.CommandBarPopup  
Dim SubCmb1 As Office.CommandBarPopup  
 
On Error Resume Next  
Application.CommandBars("MaBarre" ).Delete  
 
Set Cmb = Application.CommandBars.Add("MaBarre", msoBarTop, True, False)  
 
Set SubCmb = Cmb.Controls.Add(msoControlPopup)  
SubCmb.Caption = "Saisie"  
Set btn = SubCmb.Controls.Add(msoControlButton)  
With btn  
    .Caption = "Ecole"  
    .Style = msoButtonCaption  
    .OnAction = "Saisie Ecole"  
End With  
 
Set btn = SubCmb.Controls.Add(msoControlButton)  
With btn  
    .Caption = "Année Scolaire"  
    .Style = msoButtonCaption  
Public Sub CreerMenu()  
 
Dim Cmb As Office.CommandBar  
Dim btn As Office.CommandBarButton  
Dim SubCmb As Office.CommandBarPopup  
Dim SubCmb1 As Office.CommandBarPopup  
 
On Error Resume Next  
Application.CommandBars("MaBarre" ).Delete  
 
Set Cmb = Application.CommandBars.Add("MaBarre", msoBarTop, True, False)  
 
Set SubCmb = Cmb.Controls.Add(msoControlPopup)  
SubCmb.Caption = "Saisie"  
Set btn = SubCmb.Controls.Add(msoControlButton)  
With btn  
    .Caption = "Ecole"  
    .Style = msoButtonCaption  
    .OnAction = "Saisie Ecole"  
End With  
 
Set btn = SubCmb.Controls.Add(msoControlButton)  
With btn  
    .Caption = "Année Scolaire"  
    .Style = msoButtonCaption  
    .OnAction = "a propos"  
End With  
Cmb.Visible = True  
End Sub


---------------
Indi yatt6ara  
n°2155256
gatsu35
Blablaté par Harko
Posté le 01-09-2012 à 14:47:47  profilanswer
 

Déterrage de 7 ans,
 
Je t'invite à regarder la date du dernier message d'un topic avant de poster une réponse :D.
 
Mais merci d'avoir contribué :D


---------------
Blablaté par Harko

Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [RESOLU] Personnaliser la barre de menu Access

 

Sujets relatifs
Format de données dans access[PHP] Supprimer mot de 3 caractères maxi dans une chaine - RESOLU
Modifier le style dans une fonction (résolu)[ACCESS] fenetre intempestive formulaire
vbScript et base de donnée accessCadre obligatoire ?
vba access - barres de défilement et msgbox[SQL] Access
importation fichier DBF sous MYSQL[résolu]Petit soucis d'alignement du texte...
Plus de sujets relatifs à : [RESOLU] Personnaliser la barre de menu Access


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR