我对excel宏有疑问。我正在使用 Excel 2003。我的 excel 文档中有很多数据,我需要制作宏,这样我才能看到特定的数据。
此文档中的所有数据都是从另一个 Excel 文档中导入的。我的意思是它不是价值,而是公式。第一行是为数据标签设置的,如姓名、姓氏、编号、培训名称等。下面的行充满了这些数据。
我想要做的是: 1. 按特定列标准过滤数据。2. 使用宏: - 在范围内的所有列(比如说范围 G:BV)中搜索值“1” - 当在列中的任何单元格中找到值“1”时,它保持不变 - 当值“1”时未找到列应隐藏
我一直在努力寻找有关我的问题的信息,但没有成功。到目前为止,我想出了这段代码:
Sub FindHid()
Dim vFind
Dim rSearch As Range
On Error GoTo 0
vFind = 1
Application.ScreenUpdating = True
For i = 7 To 75
With ActiveSheet.Columns("G:G")
Set rSearch = .Find(vFind, LookIn:=xlValues, MatchCase:=False)
If rSearch Is Nothing Then
.EntireColumn.Hidden = True
Else
.EntireColumn.Hidden = False
End If
End With
Set rSearch = Nothing
Next i
End Sub