excel如果想录制一个宏 实现自动筛选 怎么操作？
你的表格应该有表头，排序和筛选都各自可以用一个语句实现，如下的代码可以在不同规模的数据下工作（前提是必须有个表头在第一行、从A列开始）：
Option Explicit
Sub X()
ActiveSheet.UsedRange.Sort key1:=Range("a2"), order1:=xlAscending, Header:=xlYes
ActiveSheet.UsedRange.AutoFilter field:=2, Criteria1:=Array("C06,", "C07")
End Sub
试验数据：
excel使用宏进行筛选
Sub Macro2()
Columns("K:K").Select
Selection.FormulaR1C1 = "=RC[-3]-RC[-2]"
Selection.AutoFilter
Selection.AutoFilter Field:=1, Criteria1:="=500", Operator:=xlAnd
Cells.Select
Selection.Copy
Application.Left = 250.75
Application.Top = 89.5
Sheets("Sheet2").Select
Range("A1").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("A1").Select
Application.CutCopyMode = False
End Sub
怎么利用EXCEl的宏进行筛选
在你数据当前的左下角sheet 鼠标右键 点击最后一个 查看代码 把下面的代码复制到里面
使用的时候 03版是 菜单 工具----宏---宏---找到test的宏执行 即可
Sub test()
Application.ScreenUpdating = False
Dim rng As Range
Dim r1, i As Long
Dim findvalue As Range
r1 = ActiveSheet.Range("B65536").End(xlUp).Row
i = 1
For Each rng In ActiveSheet.Range("B1:B" r1)
Set findvalue = ActiveSheet.Columns(1).Find(what:=rng.Value)
If Not findvalue Is Nothing Then
Cells(i, 3).Value = rng.Value
i = i + 1
End If
Next
Application.ScreenUpdating = True
End Sub
excel宏命令（条件筛选）
开发工具——宏——编辑宏——输入代码如下——运行宏，结果筛选出A列数据中的大于5的数值，如图：
在excel里面怎样用宏筛选出一列几个条件的数据
使用自定义筛选就可以了
步骤：
1 选择需要的列
2 设置好筛选
3 选择筛选中的自定义筛选
4 输入多个条件
这样就可以显示符合多个条件的数据了