I tried this too, unsuccessfully:
x = Range("A65536").End(xlUp).Row
ReDim matDatabank(x)
For i = 2 To x
matDatabank(i) = "'" & Cells(i, 1).Value & "'"
Next i
For i = 2 To x
toptions.AppendRow
toptions(i - 1, "TEXT") = "MATNR EQ " & matDatabank(i)
Next i
Please help how can I use one dimensional array as selection.
Thanks,
Csaba