10 svar · 315 visningar · startad av Patrik.Runald
Hej.
Jag har en textsträng där jag behöver leta efter ett visst ord och sedan lägga in ordet till höger om detta in i en variabel.
Exempel
======
Texten jag har ser ut så här:
----
Datum: 2003-02-28
Användare: Kalle Anka
Åtgärd: Fungerade
----
Jag vill då få datumet, användaren och åtgärden i tre olika variabler. Antar att man använder RegExp på någe sätt men har ingen aning om hur.
Kan någon hjälpa mig?
Tack för svaret Lars!
Vet inte riktigt om det blev rätt. Det jag vill få ut i ovanstående är alltså "2003-02-28", "Kalle Anka" och "Fungerade". Inte hela raden.
Då kan du använda split en gång till med :
dim i,a,t,s,x()
s = "Datum 2003-02-28" & vbcrlf & "Användare: Kalle Anka" & vbcrlf & "Åtgärd: Fungerade"
redim x(ubound(a))
a = split(s,vbcrlf)
for i = 0 to ubound(a)
t = split(a(i),":")
x(i) = t(1)
next
Då får du det som står efter kolon på varje rad i X
Lite fel ordning
dim i,a,t,s,x()
s = "Datum 2003-02-28" & vbcrlf & "Användare: Kalle Anka" & vbcrlf & "Åtgärd: Fungerade"
a = split(s,vbcrlf)
redim x(ubound(a))
for i = 0 to ubound(a)
t = split(a(i),":")
x(i) = t(1)
next
Nu kom jag längre men inte riktigt hela vägen. Nu säger den:
Subscript out of range: '[number: 1]'
på raden för "x(i) = t(1)"
Fast... jag undrar om detta verkligen ger det resultat jag vill.
Säg att jag endast vill söka på ordet "Åtgärd: " och få ut till det höger om detta i en variabel. Hur gör jag då? Då är troligen Arrays rätt sätt, eller??
Patrik.Runald skrev:
Nu kom jag längre men inte riktigt hela vägen. Nu säger den:
Subscript out of range: '[number: 1]'
på raden för "x(i) = t(1)"
Det betyder att den raden inte innehöll några kolon...
If Ubound(t) > 1 Then x(i) = t(1)