_如果您同时处理多个工作簿,并且需要一个宏来帮助您隐藏所有不活动的工作簿,那么本文肯定会为您提供帮助。

在本文中,我们将重点介绍如何隐藏当前不使用的多个工作簿。

问题:除当前正在使用的文件外,我需要快速隐藏所有excel文件,以便我可以在其他应用程序之间平稳切换。我想为我的这一独特要求寻求VBA代码。

为了获得用于隐藏所有非活动工作簿的代码,我们需要按照以下步骤启动VB编辑器:单击“开发人员”选项卡。从“代码”组中,选择“ Visual Basic

img1

”。 *在工作表模块

Sub HideInactiveExcelWorkbooks()

Application.ScreenUpdating = False

Dim aWin As Window

Set aWin = ActiveWindow

Dim win As Window

For Each win In Application.Windows

win.Visible = False

Next win

aWin.Visible = True

Application.ScreenUpdating = True

End Sub

img2

中复制以下代码*上面的代码将立即隐藏所有不活动的工作簿。注意:上面的宏不会隐藏活动的工作簿。

要取消隐藏所有工作簿,我们需要执行以下步骤:

单击查看选项卡单击取消隐藏

img3

  • 这将显示取消隐藏的工作簿

img4

选择每一个并单击“确定”按钮将取消隐藏工作簿结论:*使用上述宏代码,我们只需单击一次即可隐藏数百个不活动的工作簿。

image 48 If you liked our blogs, share it with your friends on Facebook. And also you can follow us on Twitter and Facebook.

我们很高兴收到您的来信,请让我们知道我们如何改进,补充或创新我们的工作,并为您做得更好。写信给我们[email protected]