使用VBA将文本文件复制到Excel中

Question

我有一堆文本文件要复制到excel中。每个文本文件只是一列数字，到目前为止，我已经将它们复制并手动粘贴到excel中。我有数百个文本文件，但手工过程实际上是1.打开文件，2。全部复制，3。粘贴到excel中的新列，4。关闭文件。结果将是数百列的数字，然后我可以在excel中进行统计。

编辑：我现在录制了一个执行操作的宏，这是脚本：

Sub Macro()
    ActiveCell.FormulaR1C1 = ""
    Range("C1").Select
    ActiveSheet.Paste
    Range("D1").Select
    ActiveSheet.Paste
    Range("E1").Select
    ActiveSheet.Paste
    Range("F1").Select
    ActiveSheet.Paste
End Sub

因此录制宏只捕获过程的粘贴部分 - 我是否可以在复制部分进行编码？目前，我有一个目录，里面装满了名为“Pass 0”，“Pass 1”，......“Pass 99”的文本文件（我想成千上万）。我怎样才能打开这些文件，复制它们的内容，粘贴然后关闭它们？

非常感谢任何帮助。