Bonjour a vous, chers amis !!!
Certains d'entre vous connaissent un code qui circule sur internet permettant d'alimenter l'assistant de la fonction Excel.
sois :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19 Sub DescribeFunction() Dim FuncName As String Dim FuncDesc As String Dim Category As String Dim ArgDesc(1 To 3) As String FuncName = "EXTRACTELEMENT" FuncDesc = "Returns the nth element of a string that uses a separator character" Category = 7 'Text category ArgDesc(1) = "String that contains the elements" ArgDesc(2) = "Element number to return" ArgDesc(3) = "Single-character element separator" Application.MacroOptions _ Macro:=FuncName, _ Description:=FuncDesc, _ Category:=Category, _ ArgumentDescriptions:=ArgDesc End Sub
Le code fonctionne a merveille lorsque le code est dans un module d'une feuille quelconque mais lorsque le code en question est dans un module du fichier personal.xlsb, il y a un erreur que la méthode MacroOptions de l'objet Application a échoué ...
Avez-vous une piste de solution afin de réglé cette erreur ???
merci beaucoup !!!
Partager