Ouvrir la fenêtre d'insertion de fonction en VBA

Bonjour,

Comment faire, en VBA, pour commander l'ouverture de la fenêtre Excel d'insertion d'une fonction et de se positionner automatiquement sur une catégorie (en l'occurrence personnalisée, elle contient des formules écrites en VBA) ?

Mon but est de simplifier les actions de l'utilisateur. Au clic sur un bouton du ruban, une macro sera exécutée et celle-ci ouvrira la fenêtre d'insertion de fonction avec mes fonctions personnalisées à l'écran. Et ce pour lui faire faire le moins de manipulations possibles.

Bonsoir,
Une idée comme une autre :
J'imagine =>
1 - que ta feuille se nomme feuil1
2 - une listbox "controle activeX" dans cette feuille "listbox1"
3 - une fonction personnalisée à mettre en B2 (tu adapteras)
4 - un array contenant la liste de tes fonctions personnalisées (j'ai mis un exemple dans le code ci-dessous)
5 - un bouton dans la feuille "CommandButton1"

Le bouton ouvre la listbox => doubleclick sur item de la listbox ouvre boite de dialogue de la fonction choisie

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19

Option Explicit Dim fcperso Private Sub Worksheet_Activate() ListBox1.Visible = False End Sub Private Sub CommandButton1_Click() fcperso = Array("diagonale()", "diagrect()", "EUROCONVERT()") ListBox1.Visible = True ListBox1.List() = fcperso End Sub   Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean) With Worksheets("feuil1").Range("B2") .Formula = "=" & ListBox1.Value End With ListBox1.Visible = False Application.Dialogs(xlDialogFunctionWizard).Show   End Sub

---

sinon je ne sais pas ouvrir directement sur le choix "fonctions personnalisées", à part :

Code:

---

Application.Dialogs(xlDialogFunctionWizard).Show

---