Hur gör man för att på enklaste vis ta bort varannat element från en array? Det första elementet som ska tas bort är position 1, dvs den andra.

Tacksam för svar!

kanske nått sånt här:

<code>
x = 0

for i = 0 to ...
if x = 1 then
array(i) = ""
x = 0
elseif x = 0 then
x = 1
end if
next
</code>

vet inte om det är enklast - men rätt enkelt

Här kommer ett annat exempel:
<code>
Dim Data
Dim Index
Dim Offset
Data = Array("Item 1", "Item 2", "Item 3", "Item 4", "Item 5", "Item 6", "Item 7")
For Index = 2 To UBound(Data) Step 2
Offset = Offset + 1
Data(Offset) = Data(Index)
Next
ReDim Preserve Data(Offset)
</code>