🌟巧用VBA实现:基于多个关键词模糊匹配Excel多行数据🔍

来源:

工作中是否遇到过需要从海量Excel数据中筛选特定内容?比如根据客户名称、产品类别等关键词快速定位目标数据?手动查找不仅耗时费力,还容易出错。这时,借助VBA脚本就能轻松搞定!💻✨

首先,打开Excel并按Alt+F11进入VBA编辑器。新建模块后,输入如下代码框架:

```vba

Sub KeywordFilter()

Dim ws As Worksheet

Set ws = ThisWorkbook.Sheets("Sheet1")

' 定义关键词数组

Dim keywords As Variant

keywords = Array("关键词1", "关键词2", "关键词3")

' 遍历数据区域,进行模糊匹配

For Each cell In ws.Range("A2:A100")

If Application.WorksheetFunction.CountIf(keywords, "" & cell.Value & "") > 0 Then

cell.EntireRow.Hidden = False

Else

cell.EntireRow.Hidden = True

End If

Next cell

End Sub

```

运行此代码即可实现自动过滤!灵活调整关键词范围与数据区域,让工作效率up!🚀

掌握这项技能,不仅能节省时间,还能提升数据分析能力哦~💪🎉

标签:

免责声明:本文由用户上传,如有侵权请联系删除!