分享

VBA强制启用宏才可用 否则显示空白页

 昵称72339616 2021-12-25

本技巧的目的:掌握用代码实现工作表的深度隐藏,强制用户启用VBA,否则无法看到表。

代码助手:护眼背景,行号显示及跳转,代码收藏,中文变量的快速查询输入,大大提高了代码输入的效率。

  • 代码助手下载地址 http:///blog/archives/11297

  • 中文提示变量功能:

工作表深度隐藏的代码:

  • 当宏被禁用时只有一张空白表,宏启用时隐藏空白表

  • 在事件代码中输入代码:

  • 在工作表打开时:

  • Worksheet.Visible 属性:返回或设置一个值,它确定对象是否可见。

  • xlSheetHidden 隐藏工作表,用户可通过菜单取消隐藏。

  • xlSheetVeryHidden 隐藏对象,重新可见的唯一方法是将此属性设置为 True(用户无法通过菜单取消隐藏)。

  • xlSheetVisible 显示工作表。

  • 也可以写成 sheet4.Visible = False, sheet4.Visible = True

  • 为了达到强制效果,还在关闭前写入事件代码:

  • sht.CodeName '工作表的代码名称

    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约

    类似文章 更多