Bonjour à tous!

J'ai découvert récemment la puissance shapesheets sous visio mais il a un truc que je voudrais faire et qui me bloque totalement depuis plusieurs jours.

Dans la partie "Custom Prop" je souhaiterais appeler une fonction VBA dans un champs "Value". Cette fonction me retournerait la valeur calculée mais je n'y arrive pas.

J'ai essayé de mettre l'instruction:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
=CALLTHIS("MAIN.test")
et créé dans un module MAIN la fonction
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
Public Function test(shp As Shape) As String
    test = "3"
End Function
Mais dans le shapesheet quand j'affiche la valeur retournée il y "FALSE"

Pouvez-vous m'aider? Me donner des pistes?
Merci
Alex