我的 VBA 代码太大,我正在尝试制作更小的 SUBS,因此不会出现错误,但随后会弹出错误“Ambigoius name”。我试图重命名我的潜艇......例如。
Private Sub worksheet_calculate()
Range("I9").Interior.Color=Range("AK9").Display.Format.Interior.Color
end sub
Private Sub worksheet_calculate2()
Range("J9").Interior.Color=Range("AQ9").Display.Format.Interior.Color
end sub
...当我重命名其他 subs 时,如示例所示,它什么也不做,只有原始工作正常。我如何重命名它们以便它们可以正常工作?
只需在主子程序的末尾插入以下代码行,即“worksheet_calculate”
Call worksheet_calculate2
Call worksheet_calculate3
Call worksheet_calculate4
Call worksheet_calculate4
.
.
.
Call worksheet_calculaten
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句