修改代码将适用单表为多表

xing_chen · 发表于 2023-4-15 20:30

老师！有簿中有多表，且有代码，但代码只能适用于单表运行，我希望将其修改适用于遍历多表。敬请老师赐教！谢谢

不规则结构 · 发表于 2023-4-15 21:18

这是一点VBA底子没有啊专门找免费代工啊

不规则结构 · 发表于 2023-4-15 21:21

如果原来代码没有限定工作表的代码，那就再外面套一个FOR 循环所有表，例外用IF排除，然后一句 sheets(index).select 就可以了

xing_chen · 发表于 2023-4-15 21:37

不规则结构发表于 2023-4-15 21:21
如果原来代码没有限定工作表的代码，那就再外面套一个FOR 循环所有表，例外用IF排除，然后一句 sheets(inde ...

谢谢老师回复！你真厉害，从我的点滴信息中就可以看出。是的！我的基础差，底子搏。有的只是认真学和讨教。万望老师因材施教，将你的意思在代码中表达。谢谢！

xing_chen · 发表于 2023-4-16 01:34

怎么将原表名前的数字部分和分割标准的列内容挂钩，使其分割后的表名簿重复，是个问题！尝试多变，难住了！敬请老师赐教

xing_chen · 发表于 2023-4-16 01:44

怎么继续下去

xing_chen · 发表于 2023-4-16 08:14

我对代码又修改了一下，进行到这里。敬请老师赐教

xing_chen · 发表于 2023-4-16 08:16

xing_chen 发表于 2023-4-16 08:14
我对代码又修改了一下，进行到这里。敬请老师赐教

怎么将拆分后的表名=原表名的数字部分+拆分列的内容。敬请老师赐教

wanao2008 · 发表于 2023-4-16 08:32

在原基础上修改了一下，但，原代码漏洞太多，不保证你能适用于所有情况。

QQ浏览器截图20230416083044.png

xing_chen · 发表于 2023-4-16 09:22

wanao2008 发表于 2023-4-16 08:32
在原基础上修改了一下，但，原代码漏洞太多，不保证你能适用于所有情况。

谢谢老师！运行如愿！

		自动登录	找回密码
密码			免费注册

[求助] 修改代码将适用单表为多表