高分求一个宏——从多张excel工作表中提取相同小标题的相关项目汇总到一张新建表格中

2024-11-14 13:41:16
推荐回答(3个)
回答1:

Worksheets(i).Name <> "汇总"
可以改为
Worksheets(i).Name <= "9月份"
因为文本也可以比较大小

Sql = "select * from [" & myWorkName & "$] where 报刊资料>0"
可以改为
Sql = "select * from [" & myWorkName & "$] where " & [G3] & ">0"

回答2:

把原文件到我的邮箱中,顺便把这个问题内容,在表格内加以说明
524189206@qq.com

回答3:

尝试一下,68170927@qq.com