使用 VBA 隐藏 Excel 工作表

发布于 2024-07-19 05:48:37 字数 86 浏览 4 评论 0原文

我有一个包含三张纸的 Excel 电子表格。 其中一张工作表包含其他工作表之一的公式。

是否有一种编程方式来隐藏包含这些公式的工作表?

I have an Excel spreadsheet with three sheets. One of the sheets contains formulas for one of the other sheets.

Is there a programmatic way to hide the sheet which contains these formulas?

如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。

扫码二维码加入Web技术交流群

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。

评论(5

何处潇湘 2024-07-26 05:48:37

要从 UI 中隐藏,请使用 Format > 片材> 隐藏

要以编程方式隐藏,请使用 Worksheet 对象的 Visible 属性。 如果您以编程方式执行此操作,则可以将工作表设置为“非常隐藏”,这意味着它无法通过 UI 取消隐藏。

ActiveWorkbook.Sheets("Name").Visible = xlSheetVeryHidden 
' or xlSheetHidden or xlSheetVisible

您还可以通过 VBA IDE (ALT+F11) 中工作表的属性窗格设置 Visible 属性。

To hide from the UI, use Format > Sheet > Hide

To hide programatically, use the Visible property of the Worksheet object. If you do it programatically, you can set the sheet as "very hidden", which means it cannot be unhidden through the UI.

ActiveWorkbook.Sheets("Name").Visible = xlSheetVeryHidden 
' or xlSheetHidden or xlSheetVisible

You can also set the Visible property through the properties pane for the worksheet in the VBA IDE (ALT+F11).

不可一世的女人 2024-07-26 05:48:37

您可以使用 VBA 宏以编程方式完成此操作。 您可以将工作表设为隐藏非常隐藏

Sub HideSheet()

    Dim sheet As Worksheet

    Set sheet = ActiveSheet

    ' this hides the sheet but users will be able 
    ' to unhide it using the Excel UI
    sheet.Visible = xlSheetHidden

    ' this hides the sheet so that it can only be made visible using VBA
    sheet.Visible = xlSheetVeryHidden

End Sub

You can do this programmatically using a VBA macro. You can make the sheet hidden or very hidden:

Sub HideSheet()

    Dim sheet As Worksheet

    Set sheet = ActiveSheet

    ' this hides the sheet but users will be able 
    ' to unhide it using the Excel UI
    sheet.Visible = xlSheetHidden

    ' this hides the sheet so that it can only be made visible using VBA
    sheet.Visible = xlSheetVeryHidden

End Sub
原谅我要高飞 2024-07-26 05:48:37

只是想为给出的答案添加更多细节。 您还可以使用

sheet.Visible = False

隐藏和

sheet.Visible = True

取消隐藏。

来源

Just wanted to add a little more detail to the answers given. You can also use

sheet.Visible = False

to hide and

sheet.Visible = True

to unhide.

Source

隔岸观火 2024-07-26 05:48:37

只要工作表处于活动状态,就可以在一行中完成此操作:

ActiveSheet.Visible = xlSheetHidden

但是,您可能不想这样做,特别是当您使用任何“选择”操作或使用任何更多 ActiveSheet 操作时。

This can be done in a single line, as long as the worksheet is active:

ActiveSheet.Visible = xlSheetHidden

However, you may not want to do this, especially if you use any "select" operations or you use any more ActiveSheet operations.

丢了幸福的猪 2024-07-26 05:48:37

我想回答你的问题,因为有多种方法 - 这里我将讨论广泛使用的代码。

因此,为了隐藏工作表:

Sub try()
    Worksheets("Sheet1").Visible = xlSheetHidden
End Sub

如果您想了解所有方法,还有其他方法单击此处

I would like to answer your question, as there are various methods - here I’ll talk about the code that is widely used.

So, for hiding the sheet:

Sub try()
    Worksheets("Sheet1").Visible = xlSheetHidden
End Sub

There are other methods also if you want to learn all Methods Click here

~没有更多了~
我们使用 Cookies 和其他技术来定制您的体验包括您的登录状态等。通过阅读我们的 隐私政策 了解更多相关信息。 单击 接受 或继续使用网站,即表示您同意使用 Cookies 和您的相关数据。
原文