[VBA-E] découper une chaîne de caractère

J'ai une cellule qui contient : Q5: 233,23 ... Mz : 23,2 Si : 1 Ski : ..
J'aimerai stocker dans une variable tout ce qui l'y a après Mz
Par exemple la cellule D30 qui contient mes données, je lui applique ce code, et
normalement monTab(1) devrait contenir ce que je veux mais il ne contient rien ... et monTab(0) contient : Vrai

Code:

---

1 2 3

VarX = Range("D30").Select monTab = Split(VarX, "Mz") Cells(32, 4) = monTab(0)

---

Code:

---

1 2 3

VarX = Range("D30") monTab = Split(VarX, "M") Cells(32, 4) = monTab(1)

---

ça fonctionne !!:D

Bonjour,

Il existe aussi les commandes :

Rigth, Left et Mid

A+
Lucarno