想请教一下，因为想要用储存格的值来改资料剖析的宽度
但FieldInfo:=改用变量后就没办法使用...
把概念改成简单一点也没办法使用，宏码如下
想请大家帮忙看一下是什么问题，感谢大家!!
Dim ARR(5) As Variant
ARR(5) = "Array(Array(0, 1), Array(2, 1))"
Columns("A:A").Select
Selection.TextToColumns Destination:=Range("A1"), DataType:=xlFixedWidth,
_
FieldInfo:=ARR(5), TrailingMinusNumbers:=True '不能用
Selection.TextToColumns Destination:=Range("A1"), DataType:=xlFixedWidth,
_
FieldInfo:=Array(Array(0, 1), Array(2, 1)), TrailingMinusNumbers:=True
'可以用
自问自答一下，刚发现是双引号造成系统认为是字串所以没办法用，想请问要如何改才可
以让系统从储存格中辨认要切分的规则呢？
例如B2的值为（0,1），B3的值为（2,1)
目前只有想到用字串&的方式把它们串起来
还有什么方式可以把它们连结起来呢？
谢谢大家