J'ai trouvé c'est SUBSTRING en VBA et non SUBSTR.

Merci a toi Rapidkiller.