表格无效以隐藏我想要的列

Question

当我离开工作表时，如何隐藏工作表的列？

Private Sub Worksheet_Deactivate()
    Columns("A:K").Select
    Selection.EntireColumn.Hidden = True
    Sheets("MASTER").Select
End Sub

我希望隐藏列的工作表是工作表reference。

Answer 1

由于您要停用工作表，默认工作表将成为您切换到的活动工作表，因此在使用没有工作表引用的范围（即Columns("A:K")）时，它们会引用当前工作表中的列。这就是为什么你应该总是使用对工作表的引用，即

Dim ws As Worksheet
Set ws = Worksheets("reference")

然后用它来引用它的范围：

ws.Columns("A:K").EntireColumn.Hidden = True

不是我摆脱了Select方法，这是非常气馁使用。

这可能对你很有帮助：How to avoid using Select in Excel VBA

Answer 2

列（“A：K”）。EntireColumn.Hidden = True