首先录制一个红 内容为导入TXT并且编辑后另存为EXCEL表
做好了这些后 把录制中一些没用的东西去掉 然后保存下 编辑这个红
先声明一个本文档的ThisWorkbook.name 在声明两个地址变量（文件打开路径、保存路径）然后用设定的thisworkbook=dir(文件打开路径）这样就会只找路径下的所有文件了 然后下一步 在设置一个如果：RIGHT的thisworkbook名后三位为TXT为真 那么执行你所录制的红 把下面接上录的红就行了 然后在导出文件那里 把录制的地址改为声明的变量地址 最后 设置一个 DO while和loop的循环 如果都导完了没有了 IF结束可以加一个msgbox 然后做一些其他的动作 比如把鼠标放在那个单元格上之类的
貌似你的文件是用EXCEL编辑过的 或者是从软件中直接导出的TXT数据吧 “|”这种分隔符在数据库里有见过
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024