如题,如宏为下
sub ()
语句1
语句2
语句3
……
end sub
我只想执行其中的第3句怎么操作。
谢谢解答
我的做法是:在立即窗口中输入
[AC12]= "DD145":Debug.Print [ac12]
回车
使用道具 举报
Sub a() '语句1 ' '语句2 If 条件 Then '语句3 End IfEnd Sub
注释掉比较好,需要的时候还可以去掉注释
最好上传附件或具体说明,不然只好猜了
楼主说得不太清楚,人家也不太好回答!
sub adfsdfasd()
[A2]= "145"call 求教[AC12]= "DD145"[AC12:de45]= "234"CALL 请教
我就想实现能只执行这个宏的(只的)某一句,如只执行第3句,应该怎么做到。
谢谢。
Sub adfsdfasd()' [A2] = "145"' Call 求教 [AC12] = "DD145"' [AC12:de45] = "234"' Call 请教End Sub
简单做法:
如2楼,加判断或将不要的注释掉
复杂做法:
利用代码操作VBE,实现简单做法的功能,如将想要的那句取出来另形成一个sub,并执行之,后删除,等方式
另:个人感觉有点导弹轰蚊子,训练技术除外
本版积分规则 发表回复 回帖后跳转到最后一页
小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )
GMT+8, 2024-5-16 14:57 , Processed in 0.303371 second(s), 9 queries , Gzip On, Yac On.
Powered by Discuz! X3.4
Copyright © 2001-2020, Tencent Cloud.