Bonsoir,

Voici mon soucis: Il me faut convertir et déplacer certaines sous-chaines '=>' en 'deplace' dans la chaine 'Enonce' :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
Enonce = "h#2 b) b3 => c3  f7 => f6 c) b3 => f2  f7 => g3"

pour obtenir ceci :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
Enonce = "h#2 b) deplace b3 c3 deplace f7 f6 c) deplace b3 f2 deplace f7 g3"
Si j'utilise l'instruction :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
If InStr(Enonce, " => ") Then Enonce = Replace(Enonce, " -> ", " deplace ")
j'obtiens bien sur le remplacement mais pas le déplacement des sous-chaines:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
Enonce = "h#2 b) b3 deplace c3  f7 deplace f6 c)  b3 deplace f2  f7 deplace g3"
C'est évidement pas ce que je veut. Il me semble qu'il faille indexer chaque sous-chaine de la chaine et déplacer '=>' de 2 occurrences en négatif

Mais voila comment faire en gardant à l'esprit que la chaine peut avoir une longueur variable ?

En vous remerciant pour vos idées.