您的位置:首页 > 数码常识数码常识

如何移除EXCEL菜单中最小、最大化和关闭按钮(vba窗体最小化按钮)

2025-05-13人已围观

如何移除EXCEL菜单中最小、最大化和关闭按钮(vba窗体最小化按钮)
  大家好,我们今日继续讲解VBA代码解决方案的第49讲内容,这讲的内容是如何在EXCEL窗口的菜单栏上去除最小、最大化和关闭按钮。为什么要讲这讲的内容呢?

  vba窗体最小化按钮

  因为我们在写程序的时候,往往在一个页面上写我们的按钮,这时我们不希望工作表的最小、最大化和关闭按钮出现在菜单栏中,这时该怎么办呢?

  这时我们要用到的是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%的朋友还想知道的:

  finereport添加查询按钮控件(finereport控件设置)

  html设置单选按钮(html中单选按钮默认为选中)

  怎么禁用单选按钮(jquery按钮禁用)

  怎么设计好看的按钮(按钮怎么设计)



  154604
 

很赞哦! ()

随机图文