想通过VBA实现数据提取功能，但出错，可否帮忙解决，谢谢

吉仔

想通过VBA实现附表数据提取功能，但有些地方出错，有些不会搞，可否帮忙解决，谢谢

ykcbf1100

感觉摸拟的数据有问题。
数据表怎么可能行和列都有月份呢？如：A4单元格是1月，那怎么在2月份的地方也有数据呢？

shiruiqiang

就是判断，选择公司为全部的时候就单条件，否则双条件提取

grf1973

源数据很怪，建议随着月份增加不要往列拓展。其实只要多加一个“月份”字段即可。
现在虽然能提取，但表头没法用。

grf1973

月份：2月，公司名称：A公司
sql="select [f1],[f2],[f3],[f4],[f5],[f6],[f19],[f20],[f21],[f22],[f23],[f24],[f25],[f26],[f27],[f28],[f29],[f30] from [数据采集$D3:AG11] where [f2]= 'A公司' order by instr('广州项目,北京项目,上海项目,浙江项目,福建项目,四川项目,贵阳项目,海南项目,广西项目',[f3])"

供参考。

吉仔

grf1973 发表于 2023-3-1 15:35
月份：2月，公司名称：A公司
sql="select [f1],[f2],[f3],[f4],[f5],[f6],[f19],[f20],[f21],[f22],[f23], ...

太好啦，谢谢帮忙！！