1、首先我们打开一个工作样表作为例子。
2、我们捂执涡扔使用alt+f11组合快捷键进入vbe编辑器,插入一个新的模块,并在模块中输入以下代码:Option ExplicitSub setcap()Dim b As Booleanb = wor娱浣嫁装ksheets(1).DeleteIf b ThenMsgBox "删除了工作表"ElseMsgBox "没有删除工作表"End IfEnd Sub
3、这里我们声明了一个布珀墩猥樨尔值b。其赋值为方法delete。delete是worksheets的方法,作用是删除worksheets。这里指定了是worksheets(1)序列为1的工作表。
4、如果我们执行了删除工作表的方法,那么布尔值b则为true,这里做一个判断,如果b为true,则显示信息删除了工作表。否则其他任何情况下b值都为false,则显示信息没有删除工作表。
5、这里运行了b=worksheets(1).Delete赋值的同时,也执行了一次worksheets(1).delete方法,这里大家需要注意。
6、如果我们点击确定,则显示删除了工作表,且序列为1的工作表被删除掉了。如果选择否,则会显示没有删除工作表。
7、先写到这里了,谢谢大家的观看。祝大家生活愉快。小编还有许多其他的经验可以观看,如果无法解决问题可以联系小编进行咨询。看不清楚图片的可以点击放大再看哦。