如何在Excel中根据日期自动隐藏列?
有时,在处理数据列表时,出于隐私原因,您想要隐藏一列数据,但又不想删除它们,因为它们可能在其他时间使用。在Excel中,隐藏是可能的。我们需要使用VBA应用程序的帮助,因为它不能直接在Excel中完成。本教程将帮助您了解如何在Excel中根据日期自动隐藏列。例如,假设您要隐藏一天的公司记录。
基于日期自动隐藏Excel中的列
在这里,我们将插入VBA代码以完成任务。下面是一个简单的基于日期自动隐藏列的过程。
第一步
让我们考虑一个Excel表格,数据类似于下面的工作簿中展示的数据。
选择要隐藏的列,然后右键单击工作簿名称,选择“查看代码”以打开VBA应用程序,然后在文本框中输入程序,如下图所示。
示例
Private Sub Worksheet_Change(ByVal Target As Range)
'Update By Nirmal
Dim xCell As Range
If Target.Address <> Range("A11").Address Then Exit Sub
Application.ScreenUpdating = False
For Each xCell In Range("A1:G1")
xCell.EntireColumn.Hidden = (xCell.Value < Target.Value)
Next
Application.ScreenUpdating = True
End Sub
在代码中,A11是我们输入日期的单元格,A1:G1是要隐藏的单元格范围。
第二步
现在,将表格保存为启用宏的模板,使用命令“Alt + Q”关闭VB应用程序,关闭表格,然后重新打开工作簿。然后,每次我们在单元格A11中输入日期时,小于该日期的数据将自动隐藏,如下图所示。
结论
在本教程中,我们使用了一个简单的示例来演示如何在Excel中根据日期自动隐藏列。