Bonjour,
Tu peux indiquer à la fonction Instr à partir de quel caractère il doit commencer la recherche
Exemple
1 2 3 4 5 6 7 8
| Sub t()
Const txt = "00:00:00,000 INFO [xxxx] (xxxxx-xxxxx-xxxx-000) [2020-01-01 00:00:00,000] [http-/0.0.0.0:0000-00] [INFO ] xxxxxxxxxxxx: xxxx-000000: xxxxxxxxxx"
Dim PosStart As Integer
Dim PosEnd As Integer
PosStart = InStr(txt, "http")
PosEnd = InStr(PosStart, txt, "]")
MsgBox Mid(txt, PosStart, PosEnd - PosStart)
End Sub |
Extrait de l'aide en ligne
Syntaxe
InStr([start, ]string1, string2[, compare])
La syntaxe de la fonction InStr comprend les arguments suivants :
start Facultatif. Expression numérique qui définit la position de départ de chaque recherche. Si cet argument est omis, la recherche commence au premier caractère. Si l'argument start contient une valeur de type Null, une erreur se produit. L'argument start est obligatoire si l'argument compare est indiqué.
string1 Expression de chaîne dans laquelle la recherche est effectuée.
string2 Expression de chaîne recherchée.
compare Facultatif. Indique le type de comparaison de chaînes. Si l'argument compare est de type Null, une erreur se produit. Si l'argument compare est omis, la valeur de l'instruction Option Compare détermine le type de comparaison. Indiquez un LCID (LocaleID) correct pour respecter les règles locales spécifiques à la comparaison.
Partager