Bonjour,

Je débute en VB souhaite créer une nouvelle fonction Excel (qui utilise des fonctions Excel existantes)

Voilà ce que je souhaite faire :
J'ai une fonction Excel (qui marche bien)
Cette fonction permet de traiter une chaine de caractères et retourne la chaine de caratères qui se trouve entre le 1er et le 2eme "/"
Par exemple , pour la chaine "/aaaa/bbbb/cccc" , la fonction retourne "aaaa".

Voilà la fonction :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
=STXT(A1;(CHERCHE("/";A1))+1;(CHERCHE("/";A1;(CHERCHE("/";A1))+1))-(CHERCHE("/";A1))-1)
La fonction que je souhaite créer prend en argument un nom de cellule et retourne la chaine de caratères qui se trouve entre le 1er et le 2eme "/".

Je pense que le code doit s'approcher de ça :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
ActiveCell.FormulaR1C1 = _
        "=MID(RC[-2],(SEARCH(""/"",RC[-2]))+1,(SEARCH(""/"",RC[-2],(SEARCH(""/"",RC[-2]))+1))-(SEARCH(""/"",RC[-2]))-1)"
Je ne sais pas quel type d'argument saisir pour la fonction ?
Ca peut marcher ça ? :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
Public Function Rang_1(cellule as string) as string
?
Aussi , comment utiliser l'argument "cellule" dans mon code ?

Merci de m'aiguiller ... je tourne en rond ...