先上代码。
Selection.TextToColumns DataType:=xlDelimited, Other:=True, OtherChar _
:="=", FieldInfo:=Array(Array(1, 2), Array(2, 2))
最终我测试出了以上代码。Array(1, 2):第一列的粘贴类型是2(文本粘贴).Array(2, 2):第二列的粘贴类型是2(文本粘贴)。
DataType | ファイルに含まれるデータの形式を指定。 区切り記号でフィールドが区切られた形式(xlDelimited:既定値)、固定長文字列の形式(xlFixedWidth) [省略可能] |