Manipuler ruban Excel depuis Access 97

Bonjour,
Mon application développée sous ACCESS 97 (pas le choix y'a que ça dans ma boîte) fait de l'automation avec Excel pour charger des données dans Oracle (pas le choix non plus : c'est l'ERP qui est comme ça. Pour uploader, faut passer par ce fichier excel).
Le fichier Excel avec lequel ACCESS interagit a été développé spécialement pour l'ERP et dispose d'un menu supplémentaire permettant d'uploader les données dans la base Oracle.
J'avais écrit :

Code:

---

1 2	' Exécution de la commande Charger du menu Oracle xlApp.CommandBars(125).Controls(2).Execute

---

Et ça marchait bien avec Excel 2003. Mais désormais les utilisateurs disposent de Excel 2010 et cette commande n'est plus reconnue....

Citation:

---

La méthode 'Execute' de l'objet '_CommandBarButton a échoué

---

En effet, le menu supplémentaire du fichier Excel se retrouve dans la partie "Compléments" du ruban.

Quelqu'un sait-il comment appeler ce menu ? Je ne peux pas appeler la Sub directement je suppose car elle est en Private (et c'est impossible de la mettre en Public car le fichier est généré par l'ERP...

Merci d'avance pour les éléments que vous pourrez m'apporter.

EDIT : Je viens de trouver cette discussion qui me donne qqes pistes (voir pièce jointe, je suis pas loin du but) mais en attendant je prends toute l'aide que vous pourrez m'apporter :)

Bon et bien à force de persévérance, j'ai résolu mon problème :
Déjà dans un premier temps, j'ai remplacé la référence vers "Microsoft Office 11.0 Object Library " par "Microsoft Office 14.0 Object Library " (ce qui paraît plus logique ;))
Ensuite j'ai voulu utiliser la procédure :

Code:

---

Application.CommandBars.ExecuteMso idMSO

---

Mais apparemment ça n'est valable que pour les fonctions intégrées à Excel. idMSO renvoyant vers le contrôle correspondant. Par exemple :

Code:

---

xlApp.CommandBars.ExecuteMso "Paste"

---

Donc, à force de chercher, c'est pas très compliqué : ça change pas !!!! ça doit être les IDs qui ont du changé....Sachant que l'on peut remplacer l'ID par le nom du menu personnalisé. Dans mon cas le code suivant fonctionne :

Code:

---

xlApp.CommandBars("Or&acle").Controls(2).Execute

---

Merci à moi-même lol ;)
Je vais pouvoir partir en vacances un peu plus serein :D