Hur gör jag när jag skall lägga till värden från ett fält till ett annat.
Det ska läggas efter det som finns i det andra fältet.

Ett sätt skulle kunna vara att göra så här:

ReDim Preserve(UBound(enAnnanArray())+1) as String 'Eller vad det skall vara.
enAnnanArray(UBound(enAnnanArray()))=EnArray(index)

Lämpar sig dock inte för stora datamängder om man kör redim för varje element.

\Leif

Jag fick det inte till att fungera.Jag tror att det beror på att mina arrays inte är dynamiska. Jag har två arrays med labels som jag vill ska slås ihop. De lagrar fyra värden ihop. Det kan aldrig bli mer än fyra värden tillsamman, t ex Ibland kan det finnas fyra i den ena och då noll i den andra. Stämmer det att man inte kan använda Redim på icke dynamiska arrays? Hur ska jag i så fall lösa problemet?

<code>

Dim array(4)
array(0) = "stina"
array(1) = "lars"
array(2) = "saga"
array(3) = "sven"

Max = Ubound(array) - 1
For a=0 To Max
varde = varde & array(a)
Next

Debug.Print varde
"stinalarssagasven"
</code>

Är det så du menar?
/Pelle

Jag ber om ursäkt för att jag är dålig på att förklara. Så här menar jag.

Dim array(4)
Dim annanarray(4)

Jag har dessa värden på fälten
array(0) = "stina"
array(1) = "lars"
array(2) = "saga"
annanarray(0)="sven"

Jag vill att resultatet ska bli
array(0)="stina
array(1)="lars"
array(2)="saga"
array(3)="sven"