我目前正在工作一个需要对Excel有深入了解的项目。对于这个项目,我必须设计一个Excel模板,而我目前正在为此工作。
我对如何使用Excel有一定的了解,但是其中不包含使用VBA在Excel中进行编码的知识。
我在互联网上找到了一些代码,但并不能完全解决我的问题。我的问题是我想根据一个单元格中函数的结果隐藏一些列。正如您在下面看到的那样,我已经创建了一些代码,但是在尝试了所有方法之后,我仍然无法隐藏多列。我在互联网上找到了一些可以选择多个列的解决方案,但是不幸的是,我无法在代码中使用它。如果您对我的问题有任何解决方案,请告诉我。在此先感谢您的帮助。
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Range("B5").Value = "USD" Then
Columns("C").EntireColumn.Hidden = True
ElseIf Range("B5").Value = "LC" Then
Columns("C").EntireColumn.Hidden = False
End If
End Sub
请在下面找到对我的问题有帮助的代码。感谢用户Pᴇʜ和sous2817。希望这可以帮助其他人。
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Range("B5").Value = "USD" Then
Union(Columns("C"), Columns("E")).EntireColumn.Hidden = True
ElseIf Range("B5").Value = "LC" Then
Union(Columns("C"), Columns("E")).EntireColumn.Hidden = False
End If
End Sub
本文收集自互联网,转载请注明来源。
如有侵权,请联系 [email protected] 删除。
我来说两句