完全删除工具栏和单元格标题Excel

我devise了一个工具，使用了许多现在完全可以工作的ActiveX控件。 只是为了完成它，让它看起来更干净，我希望能够完全删除工具栏和列和行标题。 这是我的Sub Auto_Open（）看​​起来像：

Sub Auto_Open() Application.DisplayStatusBar = Not Application.DisplayStatusBar ActiveWindow.DisplayWorkbookTabs = True On Error Resume Next Sheets("UserInput").Activate Range("A1").Select With Application .WindowState = xlNormal .Left = 300 .Top = 50 .Width = 800 .Height = 670 .CommandBars("Worksheet Menu Bar").Enabled = False .CommandBars("Ribbon").Visible = False End With End Sub 

下面是这个样子的截图：

我基本上只是想摆脱一切不在表格上的东西，或者如果不是尽可能的。 任何人都知道这样做的任何方式吗？ 谢谢。

Answer 1

你可以使用：

 application.DisplayFullScreen = True activewindow.DisplayHeadings = False 

仅供参考，在工作表上的ActiveX控件是出了名的片状。 如果您必须将控件放在工作表上，表单控件将是更好的select。