我是一个初学者,试图了解此错误消息的编码:Range类的TextToColumns方法失败。
文件1是带有宏代码的文件,应采用文件2中的注释文本字段(第12 / L列),并根据尾随冒号将文本分成文件1的主选项卡中的不同列(:)
代码如下:
Range("M2:M" & LastRow).TextToColumns Destination:=Range("Y2"), DataType:=xlDelimited, _
TextQualifier:=xlNone, ConsecutiveDelimiter:=False, Tab:=False, _
Semicolon:=False, Comma:=False, Space:=False, Other:=True, OtherChar _
:=":", FieldInfo:=Array(Array(1, 1), Array(2, 1), Array(3, 1), Array(4, 1), Array(5, _
1), Array(6, 1), Array(7, 1), Array(8, 1), Array(9, 1), Array(10, 1), Array(11, 1), Array(12 _
, 1), Array(13, 1), Array(14, 1), Array(15, 1), Array(16, 1), Array(17, 1), Array(18, 1), _
Array(19, 1), Array(20, 1), Array(21, 1), Array(22, 1), Array(23, 1), Array(24, 1), Array( _
25, 1), Array(26, 1), Array(27, 1), Array(28, 1), Array(29, 1), Array(30, 1), Array(31, 1), _
Array(32, 1), Array(33, 1)), TrailingMinusNumbers:=True
任何帮助将不胜感激。 谢谢,