Traitement/Extraction de chaines de caractères

[C60a]

Bonjour à tous,

J'ai dans une feuille de calcul des chaines alphanumériques que j’aimerais traiter en VBA pour en extraire et composer des chiffres seulement pour les écrire dans un fichier texte.


Voila un exemple des chaines à traiter à gauche, et le résultat voulu à droite :


012 39 M0 C1 à 6 => 012390

012 44 M2/6 => 012442 - 012446

012 40 M6 à 9 => 012406 – 012407 – 012408 - 012409

012 43 M6 à 0 => 012436 – 012437 – 012438 – 012439 -012430

012 40 M6/7 => 012406 - 012407


Merci d’avance.

 

[sousou]

Bonjour
J'ai essayé quelque chose, mais:
Pas compris la première ligne de données
2 peut-il y avoir plusieurs "/" dans une ligne. là ca ne fonctionne pas encore

 

[C60a]

Bonjour sousou,

Pas compris la première ligne de données

C'est une forme possible dans les cellules

2 peut-il y avoir plusieurs "/" dans une ligne. là ca ne fonctionne pas encore

Non, Pour mon fichier sur lequel je travaille, il n'y a qu'un seul "/"

 

[sousou]

D'accord pour une forme possible, mais quelle règle appliquer sur cette forme?
Pour le reste c'est bon ou pas?

 

[C60a]

Bonjour sousou,

mais quelle règle appliquer sur cette forme?

Ce qui importe dans le traitement c'est le "M" et ce qui le suit en chiffres.

- Si les chiffres à la suite de "M" sont séparés par un "/", ça veut dire un "et"
Ex : M6/9 => 6 et 9

- Si les chiffres à la suite de "M" sont séparés par un "à", ça veut dire un inter val
Ex : M4 à 7 C1 à 3 => 4, 5, 6 et 7

- Sinon le chiffre après le "M" sera le seul retenu.
Ex : M0 C1 à 3 => 0

Après de moult essais de codage, voici l'exemple qui retourne le résultat voulu en PJ.

A tester et s'il y'a des rectifications à faire, qu'elles soient les bienvenues

 

[sousou]

Si j'ai bien compris cà fonctionne comme tu veux?

 

[C60a]

Bonjour sousou,

Si j'ai bien compris cà fonctionne comme tu veux?

Effectivement, sauf s'il y'a des remarques à faire sur le code !