[已解决]求大神指点一下代码问题！

beachum

求大神指点以下代码：
1.使用删除TXT文件的代码时，能有效使用，但老是有提示。怎么才能避免提示出现。
2.使用删除指定时间行的代码时，如果有的文件没有达到设定时间，会自动删除一行。
希望在运行这个代码时，不能自动删除没到指定时间的行。

3.有什么办法能让这些代码按照这样的序列自动运行一次： 转换文件----删除TXT文件
----删除多列----删除指定行-----删除最后一行。

最佳答案

月排行榜 / 总排行榜

cutecpu

2021-7-2 18:17

beachum 发表于 2021-7-10 23:54
cutecpu 您好！
因为前期我对VBA的理解不足，所以造成思路不对，请谅解！
有没有可能用宏批量抓取txt中 ...

您好，
不太懂意思
可以发新帖，把问题重新描述清楚
让更多的版友有机会为您解答喔！

跳转到最佳答案楼层

cutecpu

beachum 发表于 2021-7-10 23:54
cutecpu 您好！
因为前期我对VBA的理解不足，所以造成思路不对，请谅解！
有没有可能用宏批量抓取txt中 ...

您好，
不太懂意思
可以发新帖，把问题重新描述清楚
让更多的版友有机会为您解答喔！

cutecpu

您好，要不要描述一下需求
或许会有不一样的作法

beachum

cutecpu 发表于 2021-7-2 19:27
您好，要不要描述一下需求
或许会有不一样的作法

您好！因为我对vba了解不多，所以也不知道最终该选哪个方向解决问题更适合。
就请教您帮我看看。谢谢！

最理想的情况是：能将excel文件中的数据加载到以前处理过的 excel文件中。
而且是批量，每个文件名对应相同的文件名。
附件中有一个举例，实际操作时有很多个文件。
文件名已临时改动，其中含Q是加载前，X是需要加载的数据，H是加载后。

cutecpu

beachum 发表于 2021-7-2 23:29
您好！因为我对vba了解不多，所以也不知道最终该选哪个方向解决问题更适合。
就请教您帮我看看。谢谢！
...

您好,

您文件的命名规则是什么呢？
檔名是 q.xlsx 结尾的就是加载前
檔名是 x.xlsx 结尾的就是要加载
然后把要加载的，从加载前的最后一行开始写入吗？

beachum

cutecpu 发表于 2021-7-3 13:22
您好,

您文件的命名规则是什么呢？

对！把要加载的，从加载前的最后一行开始写入！檔名 q.xlsx 和 x.xlsx都是我临时加上去的，为了方便在这里说明问题。
实际中，两个文档名字一样的，都是SH#688819.xlsx，保存在不同的文件夹里。

cutecpu

beachum 发表于 2021-7-3 14:20
对！把要加载的，从加载前的最后一行开始写入！檔名 q.xlsx 和 x.xlsx都是我临时加上去的，为了方便在这 ...

看不出这个附件，跟上个附件有什么不同
没有看到不同的资料夹，区分加载前跟要加载

beachum

cutecpu 发表于 2021-7-3 15:06
看不出这个附件，跟上个附件有什么不同
没有看到不同的资料夹，区分加载前跟要加载

哦！应该是我没表达清楚需求吧！
第一，将原始数据（TXT）文件整理成6月9日文件夹里的(SH#688819.xlsx)。
第二，再将6月9日的文件夹里的(SH#688819.xlsx),加载到6月8日的文件夹中(SH#688819.xlsx)里。
我是根据文件夹的名称来区分加载前文件跟要加载文件。
我不知道的是，vba能区分不同文件夹里相同文件名的文件吗？
第三，希望得到的效果是图片1一样。

cutecpu

beachum 发表于 2021-7-3 16:53
哦！应该是我没表达清楚需求吧！
第一，将原始数据（TXT）文件整理成6月9日文件夹里的(SH#688819.xlsx) ...

我解压附件后
没看到 txt ，还有 6月8日、6月9日资料夹喔
就只有 3 个 .xlsx 檔案
如图：

roserice

删除txt文件,直接用delete ,一下子所有txt文件都删除了,不用dir,txt文件直接导入excel就可以了,第二个问题也是数据 源的导入 ,不能识别相同文件名的文件