养生 装修 购物 美食 感冒 便秘 营销 加盟 小吃 火锅 管理 创业 搭配 减肥 培训 旅游

怎样使用VBA让VBA代码自行删除

时间:2024-10-09 20:21:38

随着手机里面功能越来越丰富,让我们使用起来越来越方便了,给我们的生活带来了极大的便利。怎样使用V幞洼踉残BA让VBA代码自行删除?

怎样使用VBA让VBA代码自行删除

工具/原料

手机

方法/步骤

1、首先在开发工具中打开VBA编辑器

怎样使用VBA让VBA代码自行删除

2、在单元格区域当中输入一些内容作为例子

怎样使用VBA让VBA代码自行删除

3、在VBA编辑器中插入模块

怎样使用VBA让VBA代码自行删除

4、在模块当中输入如下代码,然后运行Sub合计()'求和DimrngAs六咝媲拜RangeForEachrngInRange("e3:e"稆糨孝汶;&[d1048576].End(xlUp).Row)rng=rng.Offset(0,-2)+rng.Offset(0,-1)NextForEachrngInRange(Cells(13,3),Cells(13,[xfd12].End(xlToLeft).Column))rng=WorksheetFunction.Sum(rng.Offset(-10,0).Resize(10))Next'删除代码DimVbcAsObjectForEachVbcInApplication.ThisWorkbook.VBProject.VBComponentsIfVbc.Type=1ThenWithApplication.VBE.ActiveVBProject.VBComponents.Remove.Item(Vbc.Name)EndWithEndIfNextEndSub

怎样使用VBA让VBA代码自行删除

5、用快捷键Alt+F8调出运行宏窗口,然后单击“执行”按钮,工作表中行列的合计均已算出,同时彻底删除代码

怎样使用VBA让VBA代码自行删除

© 一点知识