macros隐藏/取消隐藏Excel中的列
我创build了一个简单的macros来隐藏/取消隐藏Excel中的列（下面附加）。 它工作正常，但是，在macros的列范围内添加一列时，应该隐藏的最后一列保持不被隐藏。 为了使自己清楚：macros中的列的范围是AM：BF。 当我需要在这个范围内添加一列时，列BF不会被隐藏。 你能帮助我如何改进代码，使列的初始范围将保持隐藏以及添加一个？
With Columns("AM:BF") If .EntireColumn.Hidden = True Then .EntireColumn.Hidden = False Else .EntireColumn.Hidden = True End If End With 你需要有专门的专栏。 你可以使用一个命名的范围沿AM：BF（如果你在它的中间添加一列），然后改变列顶行。 你的代码可能看起来像
With ThisWorkbook.Sheets("MySheet").Range("NamedRange").EntireColumn .Hidden = Not .Hidden End With