Trouver la chaine entre deux chaines
Trouver la chaine entre deux chaines - VB/VBA/VBS - Programmation
Marsh Posté le 07-04-2003 à 10:25:34
| dragonspyro93 a écrit : si j ai un string et que je veut recuperer toutes les chines comprises entre deux chaines precise que dois je faire ? |
temp = "bonEEEjourAAAcommEEEentAAAcava"
pos1 = Application.WorksheetFunction.Find("EEE", temp, 1)
pos2=Application.WorksheetFunction.Find("AAA", temp, pos1+3)
machaine=mid(temp,pos1+3,pos2-ps1-2)
Marsh Posté le 07-04-2003 à 14:44:27
j'avais fait une erreur ds les chiffres ,ceci permet de trouver ta chaine entre 2 chaines de tailles quelconques:
temp = "bonEEjourAAAAcommEEEentAAAcava"
ch1 = "EE"
ch2 = "AAAA"
pos1 = Application.WorksheetFunction.Find(ch1, temp, 1)
pos2 = Application.WorksheetFunction.Find(ch2, temp, pos1 + Len(ch1))
machaine = Mid(temp, pos1 + Len(ch1), pos2 - pos1 - Len(ch1))
Marsh Posté le 07-04-2003 à 15:04:38
Reply
Marsh Posté le 07-04-2003 à 15:30:24
Reply
Sujets relatifs:
- Ou trouver l'UML de l'algorithme A* ? (recherche du plus court chemin)
- URL -> CGI -> Chaine de caractère -> En faire une String ?
- Supprimer plusieurs caractères dans une chaine ?
- [VB] transformer une chaîne
- Entrer une chaine de caractere en mode INVISIBLE [PERL]
- Les chaines de caracteres, les tableaux....
- Formattage de chaine concis
- Algorithme de recherche/rempalcement de chaînes dans un fichier ??
- [access] trouver le repertoire courant [solution inside]
- debutant : fonction retournant une chaine de charactere
Marsh Posté le 07-04-2003 à 10:02:21
si j ai un string et que je veut recuperer toutes les chines comprises entre deux chaines precise que dois je faire ?
Exemple :
avec "bonEEEjourAAAcommEEEentAAAcava"
je veut recuperer "jour" et "ent" car elles sont comprises entre "EEE" et "AAA"