Prendre qu'une partie de la cellule

Bonjour,

Je me présente, Romain, 20 ans.

Je débute sur le VBA (je m'y suis mis il y a 2 semaines)

Actuellement je bloque à un niveau. Voici la cellule que j'aimerai traiter :

RRULE:FREQ=WEEKLY;COUNT=6;INTERVAL=5;BYDAY=TH

Le but est de récupérer la valeur WEEKLY pour Freq, 6 pour count, 5 pour interval et TH pour BYDAY.

Au début je pensais utiliser la fonction Mid, mais ça ne marche pas ici car je dois traiter d'autre cellules de manières automatique comme

RRULE:FREQ=WEEKLY;INTERVAL=5;BYDAY=TH

C'est à dire sans l'information count, et donc le nombre de case va varier d'une cellule à l'autre ...

Quelle fonction utiliser pour rechercher "Count=" dans la cellule puis prendre la valeur numérique située juste après ?

Merci !

Romain.

Bonjour et bienvenue sur le forum

Essaie avec la fonction Split.

Si ta cellule est en A1 :

v = Split(Range("A1"), ";")

va te décomposer ta chaine en sous-chaines délimitées par le point-virgule.

Tu peux alors appliquer mid à chaque sous-chaine dont le nombre te sera donné par

n = UBound(v)+1

Bon courage !

En complément, maintenant que je suis bien réveillé, voici un exemple, à toutes fins utiles.

Cela te va-t-il ?

Bye !


Eu !... Bien révéillé ? Pas sûr ...

Nouvelle version :


Eu !... Bien révéillé ? Pas sûr ...

Nouvelle version :

15essai.xlsm (17.06 Ko)
11essai-2.xlsm (17.25 Ko)

Okk !! Je dois avouer que j'ai eu du mal à comprendre ton code au début mais j'ai testé les différentes commandes une par une dans une autre macro et là c'est bon !

Merci beaucoup

Rechercher des sujets similaires à "prendre partie"