'Arrays' og 'split' i VBA???

[Zethyr]

Finnes det noe som tilsvarer arrays og split funksjoner i andre språk implementert i VBA? (forklar godt, jeg er n00b)

[Legion]

du spør som en n00b også...eller er det jeg som forstår som en n00b(?)

 

hva er det du er ute etter egentlig?

[Zethyr]

Jeg vil kunne ha f.eks. tallet 432 og dele det opp i en array hvor tallene ligger lagret som [element 0 = 4,element 1 = 3,element 2 = 2,]

[pumpy]

Split funksjonen finnes i VBA hvis det var spørsmålet???

 

Dim variabel() As String 'Array

Dim melding As String, n As Integer, streng As String

streng="Kan;du;være;så;snill;og;formulere;spørsmålet;litt;bedre;neste;gang?"



variabel=split(streng, ";") 'Strengen splittes med ";" som skilletegn



For n=0 to UBound(variabel)

melding=melding & variabel(n) & " "

Next n



MsgBox melding

[Zethyr]

Ja det var faktisk spørsmålet... jeg skulle lage et lite skript i VBA for fattern, men har ikke hatt tid til å gå gjennom masse bøker. Takker og bukker!!

 

For å få tilgang til ordet "være" i ditt eksempel skriver man variabel(2)??

[pumpy]

Det stemmer det. Ordet "være" vil da være den tredje oppføringen i array variabelen. Siden den første oppføringen starter med variabel(0), vil da "være" ligge under variabel(2).

 

Det er en fordel om du bruker dynamisk array i stedet for en fastsatt array når du bruker split, i og med at man vanligvis ikke kjenner antallet elementer strengen blir delt inn i.

 

Dim variabel() As String

 

I stedet for:

 

Dim variabel(20) As String

 

Bruk så UBound (UpperBound) for å finne antall elementer i array variabelen:

 

antall = UBound(variabel)