Question

我们可以使用选项＆＃34过滤excel中的数字;以＆＃34;开头，当我在框中过滤＆＃34;搜索＆＃34;组合框ex：15 *。没关系，但在数字过滤器/自定义过滤器中我使用＆＃34;以＆＃34;开头。它没有用。我尝试用方式记录宏＆＃34;搜索＆＃34;在用于代码的组合框中，但这是不可能的。

如何为此编写VBA代码。谢谢，这是录制的宏。

ActiveSheet.Range("$A$8:$AF$1194").AutoFilter Field:=12, Criteria1:=Array( _  
    "1521", "1522", "1526", "1541", "1542", "1543", "1561"),Operator:=xlFilterValues

但我想过滤价值15 *

Answer 1

是的，你是对的，这在AutoFilter中是不可能的如果您的数据是数字，这就是一种方式。

ActiveSheet.Range("$A$8:$AF$1194").AutoFilter Field:=12, Criteria1:=">=1500"

或者，如果您特别想要 15 的那些。

ActiveSheet.Range("$A$8:$AF$1194").AutoFilter Field:=12, Criteria1:=">=1500" _
    Operator:=xlAnd, Criteria2:="<1600"

编辑1：回复评论中的后续行动

您可以使用数据标签下的文本到列将所有数据更改为文本。
的步骤：

选择数据格式中包含数据的整个列。

然后点击文本到列。在第1和第2个对话框中按下一步。

在第3个对话框中，选择文字，而不是常规。

现在，您的所有数据都是文本形式然后，您可以使用以下代码过滤所有以 15 开头的内容。

ActiveSheet.Range("$A$8:$AF$1194").AutoFilter Field:=12, Criteria1:="15*"

过滤器编号选项“以...开头”

1 个答案: