随着手机里面功能越来越丰富,让我们使用起来越来越方便了,给我们的生活带来了极大的便利。怎样使用V幞洼踉残BA让VBA代码自行删除?
工具/原料
手机
方法/步骤
1、首先在开发工具中打开VBA编辑器
2、在单元格区域当中输入一些内容作为例子
3、在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
5、用快捷键Alt+F8调出运行宏窗口,然后单击“执行”按钮,工作表中行列的合计均已算出,同时彻底删除代码