excel的一个宏使用问题：现在有200个text文件，怎么用宏把这两百个文件内容合并到一个新的txt

Question

excel的一个宏使用问题：现在有200个text文件，文件名分别是1.txt 2.txt。。。。200.txt，怎么用宏把这两百个文件内容合并到一个新的txt，求高手写个宏命令

Answer 1

Public Sub test()
'将该如下代码路径进行修改即可运行
Open "C:\Documents and Settings\yfliang\Desktop\final.txt" For Output As #2 '创建一个文件名为final.txt的文件
For i = 1 To 200
Open "C:\Documents and Settings\yfliang\Desktop\" & i & ".txt" For Input As #1 '将200个文件的内容读入final.txt文件
Do While Not EOF(1)
Line Input #1, realdata
Print #2, realdata
Loop
Close #1
Next
Close #2
End Sub

Answer 2

进入dos，用copy命令合并。
比如这些文件在d盘text目录，操作如下：
开始 ，运行 ，cmd
d：
cd text
copy *.txt aaa.txt
合并好的就在aaa.txt追问

这样岂不是要把所有的txt都合并了，如果有些不需要合并的呢？比如存在201、202、203.txt等等

本回答被网友采纳

Answer 3

我这里有个文件合并工具 软件，可以给你。