Utiliser des raccourcis pour ouvrir les menus

[hugostup]

Bonjour,
Je voudrai assigner Alt + 1 pour ouvrir le menu Fichier, Alt + 2 pour ouvrir le menu Edition, Alt + 3 pour Affichage etc. Je suis allé dans Outils → Personnaliser → Clavier mais l’action que je veux faire n’y figure pas, à savoir “ouvre moi tel menu mais sans rien faire d’autre”. En fait il s’agit de faire ce que fait le raccourci Alt + F avec le menu Fichier mais de le faire avec Alt + 1. Merci à vous.

Bonne soirée,
Hugostup

[PYS]

Bonjour @hugostup

Tu ne précises pas ton environnement. Sous Windows tu peux t’inspirer de la réponse de Charlie Young sur le forum Apache.

Créer par exemple le script suivant pour ouvrir le menu Fichier :

<package>
   <job id="vbs">
      <script language="VBScript">
      Dim Args
      Dim AppString
      
      Set Args = WScript.Arguments
      AppString = Args(0)
        set WshShell = WScript.CreateObject("WScript.Shell")
        WshShell.AppActivate AppString
        WshShell.SendKeys "%{F}"
       </script>
   </job>
</package>

Dans LibreOffice créer la macro :

Sub RunWScript1
   Dim AppString As String
   AppString = StarDeskTop.ActiveFrame.Title
   shell("WScript ""C:\Test\openFile.wsf""" & " " & AppString,False)
End Sub

et l’associer au raccourci-clavier de ton choix. Idem pour les autres menus…

Cordialement

[hugostup]

Merci @PYS,
Je suis sous Windows effectivement. Je ne maîtrise pas bien l’emploi des macros sous Libreoffice (nulle part ceci dit), il faut que je me penche sur ta solution. Merci en tout cas

Bonne journée à toi,