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

Question

我设计了一个使用许多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控件众所周知。如果您必须将控件放在工作表上，表单控件将是更好的选择。