丁薪一优秀作者
原创内容 来源:小居数码网 时间:2024-08-11 12:24:01 阅读() 收藏:40 分享:79 爆
导读:您正在阅读的是关于【数码知识】的问题,本文由科普作家协会,生活小能手,著名生活达人等整理监督编写。本文有586个文字,大小约为3KB,预计阅读时间2分钟。
大家好,我们今日继续讲解VBA代码解决方案的第49讲内容,这讲的内容是如何在EXCEL窗口的菜单栏上去除最小、最大化和关闭按钮。为什么要讲这讲的内容呢?
因为我们在写程序的时候,往往在一个页面上写我们的按钮,这时我们不希望工作表的最小、最大化和关闭按钮出现在菜单栏中,这时该怎么办呢?
这时我们要用到的是Protect方法,该方法语法如下:
expression.Protect(Password, Structure, Windows)
参数:
a) expression是必需的,该表达式返回一个Workbook对象。
b) Password是可选的,为工作表或工作簿指定区分大小写的密码。
c) Structure是可选的,如果为True,则保护工作簿结构(工作表的相对位置)。默认值为False。
d) Windows是可选的,如果为True,则保护工作簿窗口
根据上面Protect方法的定义,可以使用以下代码去除工作表的最小、最大化和关闭按钮及图标不出现在菜单栏中:
ActiveWorkbook.Protect , , True
这简单的代码使用Protect方法对工作簿进行保护。Protect方法应用于Workbook对象的时保护工作簿使其不至被修改,
同理, 根据上面Protect方法的定义,可以使用以下代码恢复工作表的最小、最大化和关闭按钮及图标出现在菜单栏中:
恢复工作表的最大、最小化和关闭按钮的代码如下:ActiveWorkbook.Protect , , False
在本例中将Windows参数设置为True,使工作簿窗口受到保护,工作表的最小、最大化和关闭按钮及图标不出现在菜单栏中。如果设置成False使工作表的最小、最大化和关闭按钮及图标又出现在菜单栏中。
下面看我们的实测代码:
Private Sub Workbook_Activate()
ActiveWorkbook.Protect , , True
End Sub
Sub MyWork()
ActiveWorkbook.Protect , , False
End Sub
代码窗口:
下面看看代码的运行前:窗口的最大、最小、关闭按钮出现在右上角。
运行后:这时窗口的右上角的最大、最小、关闭的按钮不见了。
我们再次运行MyWork过程:窗口的最大、最小、关闭按钮又出现在右上角
上面就是小居数码小编今天给大家介绍的关于(vba窗体最小化按钮)的全部内容,希望可以帮助到你,想了解更多关于数码知识的问题,欢迎关注我们,并收藏,转发,分享。
94%的朋友还想知道的:
(377)个朋友认为回复得到帮助。
部分文章信息来源于以及网友投稿,转载请说明出处。
本文标题:如何移除EXCEL菜单中最小、最大化和关闭按钮(vba窗体最小化按钮):http://sjzlt.cn/shuma/154604.html