需要使用文本到列的帮助吗&；Fieldinfo使用Excel中的VBA分析列

根据下面的评论，我正在编辑我原来发布的问题，以更准确地反映我的问题

这是我的工作。在我的工作程序中，我将数据表下载到csv文件中，它会自动在记事本中打开数据。我没有将文件保存在记事本中。（此过程在我的每个工作中都必须保持不变。保存数据是不必要的，而且需要花费太多的时间，因为我每天必须执行数百次相同的步骤。）

一旦数据在记事本中打开，我将复制所有数据。然后我需要将数据直接粘贴到excel中。数据由66个不同的列组成，包括标题。我需要解析这些列，以便跳过其中的许多列，而将其他大多数列粘贴为文本。在下面的数组中，我想我使用数组（1，9），数组（4，2）方法正确地展示了这一点，希望跳过第1列，将第4列粘贴为文本，等等

但在运行此代码时，会跳过第一列，但随后会粘贴所有后续列，而不会遵循我在代码中编写的任何数组设置。我在这个网站和许多其他网站上研究了一些问题。我不知道我的代码有什么问题导致了这个问题

以下是我使用的数据链接（为匿名数据而编辑）：

以下是我正在使用的代码：

    Sub Test_PasteParsing()


        With ThisWorkbook.Sheets(1)
                Range("A1").PasteSpecial
        End With


        Columns("A:A").TextToColumns _
                    Destination:=Range("A1"), _
                    DataType:=xlDelimited, _
                    TextQualifier:=xlDoubleQuote, _
                    ConsecutiveDelimiter:=True, _
                    Tab:=True, _
                    Semicolon:=False, _
                    Comma:=False, _
                    Space:=False, _
                    Other:=False, _
                    OtherChar:=False, _
                    FieldInfo:=Array(Array(1, 9), Array(2, 9), Array(3, 4), Array(4, 2), Array(5, 9), Array(6, 9), _
                        Array(7, 9), Array(8, 2), Array(9, 9), Array(10, 9), Array(11, 2), Array(12, 9), _
                        Array(13, 2), Array(14, 9), Array(15, 9), Array(16, 2), Array(17, 9), Array(18, 9), _
                        Array(19, 9), Array(20, 9), Array(21, 9), Array(22, 9), Array(23, 9), Array(24, 9), _
                        Array(25, 9), Array(26, 9), Array(27, 9), Array(28, 2), Array(29, 2), Array(30, 2), _
                        Array(31, 2), Array(32, 9), Array(33, 9), Array(34, 9), Array(35, 9), Array(36, 9), _
                        Array(37, 9), Array(38, 2), Array(39, 9), Array(40, 2), Array(41, 9), Array(42, 9), _
                        Array(43, 9), Array(44, 9), Array(45, 9), Array(46, 9), Array(47, 9), Array(48, 9), _
                        Array(49, 9), Array(50, 9), Array(51, 2), Array(52, 2), Array(53, 2), Array(54, 2), _
                        Array(55, 9), Array(56, 9), Array(57, 2), Array(58, 9), Array(59, 2), Array(60, 9), _
                        Array(61, 9), Array(62, 2), Array(63, 9), Array(64, 9), Array(65, 2), Array(66, 2)), _
                    TrailingMinusNumbers:=True


    End Sub

---

以上代码只是部分代码。没有要从中导入的文件名。请提供代码，以便我可以复制该问题。很难猜到还有什么在做。为什么不使用txt导入助手来选择要导入的列？你可以用宏记录器为这个问题创建一个宏。我在上面编辑了我的原始帖子，希望能更准确地描述我如何使用数据并粘贴到Excel中+donPablo:上面的代码是完整的。如果我给人的印象是我在使用保存的文件，请原谅我原来的帖子。我直接从打开的记事本复制数据，并将数据粘贴到Excel中+大卫·加西亚·博迪戈：你说的txt导入助手是指txt导入向导吗？我认为这只用于保存的文件，在本例中，我没有使用保存的文件。我为我造成的任何混乱道歉。