订阅怎样使用VBA屏蔽Excel部分显示功能？
来源：网络收集 点击： 时间：2024-04-18首先在开发工具中打开VBA编辑器
2/5在单元格区域当中输入一些内容作为例子
3/5在VBA编辑器中插入模块
4/5在模块当中输入如下代码，然后运行
Private Sub Workbook_BeforeClose(Cancel As Boolean) 关闭本工作簿时恢复显示模式Application.SendKeys ^{F1} DoEvents Application.SendKeys % DoEvents Application.SendKeys +{F10} DoEvents Application.SendKeys s With ActiveWindow .DisplayHorizontalScrollBar=True 显示水平滚动条 .DisplayVerticalScrollBar=True 显示垂直滚动条 .DisplayWorkbookTabs=True 显示工作表标签 .DisplayGridlines=True 显示网格线 .DisplayHeadings=True 显示行列标题 End With Me.SaveEnd SubPrivate Sub Workbook_Open() 开启本工作簿时修改显示模式Application.SendKeys ^{F1} 修改快速访问工具栏的显示方式，即位于功能区上方还是下方 DoEvents Application.SendKeys % DoEvents Application.SendKeys +{F10}
DoEvents Application.SendKeys s 功能区最小化 With ActiveWindow .DisplayHorizontalScrollBar=False 不显示水平滚动条 .DisplayVerticalScrollBar=False 不显示垂直滚动条 .DisplayWorkbookTabs=False 不显示工作表标签 .DisplayGridlines=False 不显示网格线 .DisplayHeadings=False 不显示行列标题 End WithEnd Sub
5/5重新打开工作簿，则工作簿启动后滚动条、工作表标签、网格线、行列标题和功能区都不显示，同时将快速访问工具栏的显示方位调换
注意事项智能手机助理给我们的生活带来了极大的便利！
版权声明：
1、本文系转载，版权归原作者所有，旨在传递信息，不代表看本站的观点和立场。
2、本站仅提供信息发布平台，不承担相关法律责任。
3、若侵犯您的版权或隐私，请联系本站管理员删除。
4、文章链接：http://www.1haoku.cn/art_540494.html
