Excel VBA 自动过滤特定子字符串

Sum*_*mar 0 excel vba

我有多行包含不同的字符串,我想在其中过滤按此顺序的数据

“DI 然后数字”即DI07493A

列值如下:

01利辛

05利辛

阿尔胡斯克

DI07493A

ABS16

外国直接投资

DI94193A

我正在这样尝试。

sheet1.Range("A1:A" & LastRow).AutoFilter Field:=4, Criteria1:= DI & #, Operator:=xlFilterValues
Run Code Online (Sandbox Code Playgroud)

它不工作。有办法得到这个结果吗?

use*_*973 5

请尝试以下操作:

有一个带有标题(例如称为标题)的列(假设为 A1:A8),然后是值。

然后在 B 列上,具有相同的标题,并且 B2:B11 中的值是DI0*, DI1*, DI2*, DI3*, DI4*, DI5*, DI6*, DI7*, DI8*, DI9*

然后使用以下代码应用AdvancedFilter :

Range("A1:A8").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=Range("B1:B11").
Run Code Online (Sandbox Code Playgroud)

运行代码之前

运行代码后