Recherche:

Oui si deubelte veut récupérer le texte entre le 2e $ et le 3e $, mais pas pour tous les caractères après le 2e $...
Mais y'a surement plus simple que ce que j'ai donné...
Ensuite, si son texte...

Tu devrais pouvoir trouver ton bonheur avec Instr ou InstrRev...

texte="11$J$33$aaa"
i = InStr(1, texte, "$", vbTextCompare)
If i > 0 Then
i = InStr(i + 1, texte, "$", vbTextCompare)
...