Bonjour,

J'avais sous Excel 2002, créé une barre de menus qui s'appelait 'Mois" et qui en se déroulant contenait les sous menus intitulés de "janvier" à "décembre".

La Sub AllerTelMois() ci-dessous me permettait de récupérer l'index du sous menu sélectionné pour lancer la fonction Début_mois (no_mois) qui m'affichait le début du mois demandé en première ligne et première colonne de ma fenêtre visible.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
Sub AllerTelMois()
no_mois = CommandBars.ActionControl.Index
Début_mois (no_mois)       'appel de la fonction
End Sub
J'ai recréé dans LibreOffice la même barre de menu, mais je n'arrive pas à trouver dans le Basic de LibreOffice l'équivalent de CommandBars.ActionControl.Index, pour récupérer l'index du sous menu sélectionné, pour passer sa valeur en paramètre à la fonction Début_mois(mois_cible)

Quelqu'un peut-il m'aider ?
Merci d'avance.