我有一段代码,叫他 AA 吧。
我想对sheet4、6、7、8等10个工作表执行。
想问,怎么操作呀。。。求大神赐代码!!
另外,我找到这段代码,但是只能实现对当前工作表执行AA。其他的9个并没有执行。求原因!!
Sub Main()
Dim c
On Error Resume Next
For Each c In Array("sheet4", "sheet6", "sheet7", "sheet8", "sheet9", "sheet10", "sheet11", "sheet12")
Sheets(c).Select
Call AA
Next
End Sub
第1个回答 2020-07-30
你的代码不对,遇到错误直接跳过了for each in 只执行了AA,默认为当前工作表,所以只对当前工作表写入追答
录制宏都赖的录,我录制的你看看
第2个回答 2020-07-30
你把数据组中的sheet4,sheet6......,改成相应的4,6..........
第3个回答 2020-07-29
我想对sheet4、6、7、8等10个工作表执行。 想问,怎么操
第4个回答 2020-10-08
估计应该是在thisworkbook(整个工作簿)的代码框中编辑你的代码,再看有没有什么错误