Ouvrir un formulaire via un ribbon perso

djodu69 · 25/08/2008, 16h38

Bonjour,

J'ai créer un ruban personnalisé pour mon application et j'aimerai que les boutons qui sont intégrés au ruban permettent d'ouvrir des formulaires de mon application. J'ai cherché sur le net, et la seule chose que j'ai trouvé parle de "onaction", or je n'ai pas trop compris l'utilisation.

Voici un exemple du code de mon ruban

Code :

<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui"> 
   <ribbon startFromScratch="true">
      <tabs>
         <tab id="tabInfosBase" label="Infos de Base" visible="true">
         <group id="grpInfosBase" label="Infos de Base">
             <button id="btnFrs" label="Les Fournisseurs" size="large" imageMso="DistributionListSelectMembers"/>
			 <separator id="sep1"/>
             <button id="btnClients" label="Les Clients" size="large" imageMso="MeetingsWorkspace"/>
			</group>
         </tab>
</tabs>
  </ribbon>
</customUI>

Pourriez-vous m'éclairez svp

Merci par avance

Arkham46 · 25/08/2008, 20h48

Bjr,

Avez vous lu ce tuto ?
http://warin.developpez.com/access/ruban/

djodu69 · 26/08/2008, 08h26

Bonjour,

Oui, je me suis basé dessus, mais j'obtiens une erreur de compilation au lancement dès que j'utilise du code du genre

Code :

Public Sub btnDupliquer_action(ByVal control As IRibbonControl)
  
   MsgBox "Yess"
   
    
End Sub

Il me dit "Une erreur est survenue lors de la compilation de cette fonction.
Le module Visual Basic comporte une erreur de syntaxe
Verifiez le code puis recompilez-le."

Au début, je pensais à un pb de référence mais j'ai bien les 2 nécessaires :
* Microsoft Office 12 Object Library
* Microsoft Scripting Runtime

Dolphy35 · 31/08/2008, 21h01

Salut,

et l'erreur est placée ou ?

avec ton code en rajoutant le paramètre onAction :

Code xml :

<button id="btnFrs" label="Les Fournisseurs" size="large" imageMso="DistributionListSelectMembers" onAction="btnFrs_action"/>

et ce code dans la fonction :

Code :

Public Sub btnFrs_action(ByVal control As IRibbonControl)
  
   MsgBox "Yess"
   
End Sub

Tout fonctionne à merveille

Dolphy

25/08/2008, 16h38	#1 (permalink)
djodu69 Candidat au titre de Membre du Club Date d'inscription: juillet 2008 Messages: 29	Ouvrir un formulaire via un ribbon perso Bonjour, J'ai créer un ruban personnalisé pour mon application et j'aimerai que les boutons qui sont intégrés au ruban permettent d'ouvrir des formulaires de mon application. J'ai cherché sur le net, et la seule chose que j'ai trouvé parle de "onaction", or je n'ai pas trop compris l'utilisation. Voici un exemple du code de mon ruban Code : <customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui"> <ribbon startFromScratch="true"> <tabs> <tab id="tabInfosBase" label="Infos de Base" visible="true"> <group id="grpInfosBase" label="Infos de Base"> <button id="btnFrs" label="Les Fournisseurs" size="large" imageMso="DistributionListSelectMembers"/> <separator id="sep1"/> <button id="btnClients" label="Les Clients" size="large" imageMso="MeetingsWorkspace"/> </group> </tab> </tabs> </ribbon> </customUI> Pourriez-vous m'éclairez svp Merci par avance

25/08/2008, 20h48	#2 (permalink)
Arkham46 Rédacteur/Modérateur Date d'inscription: septembre 2003 Messages: 2 569	Bjr, Avez vous lu ce tuto ? http://warin.developpez.com/access/ruban/ __________________ ------------------------------------------------------------------------------------------------------------------------------------------- [Office] Défi n°1 : Créer un jeu de puissance 4 [ACCESS][EXCEL] clGdiPlus est un module de classe VBA pour faciliter l'utilisation de la librairie graphique gdiplus.dll (GDI+)

26/08/2008, 08h26	#3 (permalink)
djodu69 Candidat au titre de Membre du Club Date d'inscription: juillet 2008 Messages: 29	Bonjour, Oui, je me suis basé dessus, mais j'obtiens une erreur de compilation au lancement dès que j'utilise du code du genre Code : Public Sub btnDupliquer_action(ByVal control As IRibbonControl) MsgBox "Yess" End Sub Il me dit "Une erreur est survenue lors de la compilation de cette fonction. Le module Visual Basic comporte une erreur de syntaxe Verifiez le code puis recompilez-le." Au début, je pensais à un pb de référence mais j'ai bien les 2 nécessaires : * Microsoft Office 12 Object Library * Microsoft Scripting Runtime

31/08/2008, 21h01	#4 (permalink)
Dolphy35 Responsable Outlook Date d'inscription: octobre 2004 Localisation: Rennes Messages: 3 300	Salut, et l'erreur est placée ou ? avec ton code en rajoutant le paramètre onAction : Code xml : <button id="btnFrs" label="Les Fournisseurs" size="large" imageMso="DistributionListSelectMembers" onAction="btnFrs_action"/> et ce code dans la fonction : Code : Public Sub btnFrs_action(ByVal control As IRibbonControl) MsgBox "Yess" End Sub Tout fonctionne à merveille Dolphy __________________ Initiation au VBA d'Outlook venez défier mabrute Je ne réponds pas aux questions techniques par MP

		Forum des développeurs > Hardware, Systèmes et Logiciels > Microsoft Office > Access > IHM
Ouvrir un formulaire via un ribbon perso

Outils de la discussion
Afficher une version imprimable Envoyer un lien vers cette page par email