当前位置:千优问>百科知识>excel表格下面没有了怎么办

excel表格下面没有了怎么办

2022-11-24 11:40:09 编辑:leo 浏览量:561

excel表格下面没有了怎么办

excel表格下面没有了怎么办

菜单栏位置,右键-----自定义------命令-------内置菜单--------命令栏选中所需拉上菜单栏ok。打开一个excel文件,按ALT+F11,然后在打开的窗口中点击插入——模块,在出线的对话框中输入下面这段程序: Sub aaa()Dim aa, bb As Booleanaa = Truebb = FalseApplication.CommandBars("ply").Enabled = aa'右键点工作表标签是否可用 Application.CommandBars("cell").Enabled = aa'右键点单元格是否可用 Application.CommandBars("toolbar list").Enabled = aa'右键点工具栏及逗视图地-逗工具栏地是否可用 Application.CommandBars("autocalculate").Enabled = aa'右键点状态栏是否可用 Application.CommandBars("worksheet menu bar").Enabled = aaApplication.CommandBars(1).Enabled = aa'以上两句的作用都是把菜单取消 Application.CommandBars(2).Enabled = aa'暂时未知 Application.CommandBars(3).Enabled = aa'常用工具栏是否可用 Application.CommandBars(3).Controls(3).Enabled = aa'使常用工具栏中第三个逗保存地是否可用 Application.CommandBars(4).Enabled = aa'格式工具栏是否可用 Application.CommandBars(5).Enabled = aa'暂时未知 Application.CommandBars(1).Enabled = aa'恢复菜单可用 Application.CommandBars(1).Controls(1).Enabled = aa'使菜单中的逗文件地是否可用 Application.CommandBars("file").Controls("页面设置(&U)...").Enabled = aa'菜单中的逗文件地中的逗页面设置地是否可用 Application.CommandBars(1).Controls(4).Enabled = aa'菜单中的第四个逗插入地是否可用 Application.CommandBars(1).Controls(4).Caption = "victor"'更改名称 Application.CommandBars(1).Reset'恢复菜单 Application.DisplayFormulaBar = aa'编辑栏是否显示 Application.DisplayStatusBar = aa'状态栏是否显示 ActiveWindow.DisplayHeadings = aa'行号列标是否显示 ActiveWindow.DisplayWorkbookTabs = aa'工作表标签是否显示 ActiveWindow.DisplayHorizontalScrollBar = aa'水平滚动条是否显示 ActiveWindow.DisplayVerticalScrollBar = aa'垂直滚动条是否显示 End Sub 然后按F5,运行宏aaa,然后关闭,回到excel中就可以看到工具栏等都又出现了。

标签:excel,表格