Concatena um intervalo invertido no Libre Office

Question

Sou meio que novo em programação, mas tenho que fazer um documento excel, que eu possa usar de forma interativa porque a saída de um dos meus programas não se encaixa na entrada dos outros ...

Eu tenho muitos dados em uma coluna, e tenho que colocá-los em várias linhas, como single cella.

Eu consegui fazer isso, mas meu próximo problema é que cada segunda linha é invertida.

Eu tenho:

1
2
3
4
5
6
7
8

Eu preciso:

1234
8765

Mas o número de linhas varia de um arquivo para outro, e é por isso que preciso fazer o script dele.

Para as linhas não invertidas, estou usando isso

Function ConcatenateColArray(pArray()) as String
Dim i as Long
Dim rText as String

rText = ""
For i = Lbound(pArray(),1) to Ubound(pArray(),1)
    rText = rText & pArray(i,1)
Next i

ConcatenateColArray = rText
End Function REM ConcatenateColArray

Estou tentando mesclar este código com:

for x =  LBound(MyArray) to UBound(MyArray)/2
tmp = MyArray(x)
MyArray(x) = MyArray(UBound(MyArray) - x)
MyArray(Ubound(MyArray) - x) = tmp
next x

Que eu tenho um código "row array para uma célula" e outro "array de linhas de ordem invertida para uma célula"

Mas isso não funciona.

Como resolvo isso?