- 1 - 

vba

提取筛选数据的内容

    VBA

提取和筛选数据是很常见的任务，同时也是

 VBA 

编程的基

础内容之一。

在

 Excel 

中，

我们可以利用

 VBA 

宏来快速地提取和筛

选特定条件的数据内容，从而方便地进行数据的处理与分析。

在

 VBA 

中，我们可以使用

 Range 

对象来引用

 Excel 

中的单元

格或单元格区域，使用

 If 

语句或

 For 

循环语句来进行数据的筛选

与提取。

除此之外，

还可以使用

 Filter 

和

 AdvancedFilter 

方法来

进行数据的筛选与提取。

在使用

 Filter 

方法时，可以设置需要筛选的字段（即列）

，筛

选条件及筛选结果的输出范围。

例如，

以下的代码可以筛选出

 Sheet1 

中第一列中值为

 'Apple' 

的所有数据行，并将结果输出到

 Sheet2 

中：

    ``` 

    Sub FilterData() 

    Sheets('Sheet1').Range('A1:C10').AutoFilter Field:=1, 

Criteria1:='Apple' 

    Range('A1:C10').SpecialCells(xlCellTypeVisible).Copy 

Destination:=Sheets('Sheet2').Range('A1') 

    Sheets('Sheet1').AutoFilterMode = False 

    End Sub 

    ``` 

在使用

 AdvancedFilter 

方法时，

需要先创建一个筛选条件区域，