excel禁止插入(添加)工作表的几种不同的VBA语句写法
发布时间：2022-03-17 18:42:58
有时候工作需要，禁止用户在现有的工作薄中插入添加工作表。用基础操作无法实现禁止插入(添加)工作表，可以使用VBA代码来完成。
禁止插入(添加)工作表的方法一：
按下ALT+F11，打开VBE编辑器，在ThisWorkbook中添加以下代码：
Private Sub Workbook_NewSheet(ByVal Sh As Object)
Application.DisplayAlerts = False
ActiveSheet.Delete
Application.DisplayAlerts = True
End Sub
下面是用VBA禁止插入(添加)工作表的一个截图：
禁止插入(添加)工作表的方法二：
将方法一的代码改为下面的：
Private Sub Workbook_NewSheet(ByVal Sh As Object)
'关闭屏幕的刷新
Application.ScreenUpdating = False
'关闭删除工作表时显示的提示对话框
Application.DisplayAlerts = False
Sh.Delete
'打开屏幕刷新
Application.ScreenUpdating = True
End Sub
这样也可以禁止在一个工作簿中添加插入工作表。这段代码严格的是只是将新增加的工作表删除。
禁止插入(添加)工作表的方法三：
代码人性化直观一些，用消息框提示：
Private Sub Workbook_NewSheet(ByVal Sh As Object)
MsgBox "你不能插入工作表"
Application.DisplayAlerts = False
ActiveSheet.Delete
Application.DisplayAlerts = True
End Sub
excel禁止插入(添加)工作表的几种不同的VBA语句写法的下载地址：
0
投稿猜你喜欢
我们经常在做PPT时遇到这样的情况：精心搭配了一套非常棒的字体方案，设计出一份高大上的PPT。可是，当拿到其他电脑上放映PPT文档时，许多字- 最近不少用户在网上表示，他们在更新Win10系统时遇到了错误代码为800706d9。这个错误代码的意思是：支持更新的安装程序运行的某些服务没
- 微软本周推送的Win10正式版10586.318更新KB3156421会导致部分用户系统出现问题，具体表现为电脑运行变慢，或者干脆无法成功安
- excel工作表标签颜色怎么添加或删除?excel工作簿中有很多工作表，想要让工作表标签显示不同的颜色，方便查找，该怎么设置标签的颜色呢？下
- 如何将手机qq音乐本地歌曲导入到电脑?我们在使用手机qq音乐听歌的时候，会将自己喜欢的歌曲下载下来，现在想要将手机qq音乐中下载的歌曲导入到
- 电脑管家如何添加信任软件呢？有时候我们下载的软件会出现被电脑管家拦截的情况，对此有没有什么方法可以让电脑管家添加信任软件呢？其实方法是非常简
- 为了节约纸张怎么在A4纸上打印8张图片，具体的操作方法怎样的?接下来我们要好好利用Word排版将8张图打印到A4纸张上，下面小编就教你具体怎
- 下面介绍一下WIN8升级FLASH插件的方法Win8系统相对我们的熟悉的Win7以及XP系统有很大的不同，比如界面更加精简、Win8没有开始
- 对于苹果的iPhone系列来说，最大的功臣绝对有台积电的份，帮助苹果疏远三星的同时，还担负起了A系列的主要代工任务。不可否认，傍上苹果最赚钱
- 通常我们需要在输入用户名和密码信息之后才能登陆远程计算机，或者访问站点。其实我们完全可以利用win7自带的保存凭据功能，省略掉这些繁琐的步骤
- 具体操作如下： 点击＂视图－幻灯片母版＂（下图１处），进入幻灯片母版。 然后选中老妈级母版（下图２处，此处如果你理解母
- 在excel求和算是最普遍的一种用途，在日常办公中也经常需要使用到。今天，小编给大家介绍四种excel求和的方法，希望对你有所帮助!top1
- Win10有一个非常好用的功能，就是任务栏的搜索框。这个功能在我们日常使用电脑的时候给予了我们非常大的帮助，而最近有不少用户反应，在深色模式
- wps表格如何续表？wps表格中想要续表，该怎么办呢？续表大概分为两种，一种是续表的标题行，另一种就是在下一页表上，下面我们就来看看WPS续
- 1.首先我们需要插入一个简单的柱状图。打开一份有数据的表格。选中整个表格，然后如下图圈起来的地方依次单击【插入】——【图表】——【(二维柱形
- 现在大多数人都在使用Win10系统，就有很多网友好奇win10系统主要功能有哪些？如果还不知道的网友，今天小编就给大家讲讲win10系统主要
- BIOS主要有Award BIOS /AMI BLOS /Phoenix.BIOS 三种类型，那么如何刷新bios？刷新BIOS失败后有哪些
- Win10系统如何加入工作组？在了解这个问题前，我们需要知道为什么要加入工作组，事实上，加入工作组是为了区分用户计算机在网络中的类别，加入工
- word文档输入公式时经常遇到输入上标、下标，数学公式编辑器可以很方便的帮你输入。但是问题是更多的时候我们仅仅是输入文本文字的时候需要输入上
- 我们在制作wps演示文稿的时候，为了提高工作效率，一般都会选择套用模板，对于新手来说可能不知道怎样操作，下面就让小编告诉大家如何使用wps演
