VBA希望使用“> 21”作为值而不是逻辑运算符

时间:2016-07-13 12:50:15

标签: vba excel-vba excel

在我的要求中,我有一个列,其中一个单元格值定义为“> 21”,14-21等等,我需要根据条件>21进行过滤,而不是作为一个值逻辑运算符大于21。

我宣布

Const gt=">21"

sub main()
.
.
.
.
sample gt

end sub

sub sample(grt as string)
.
.
.
.
.
.
Selection.autofilter field:=4 criteria1=grt

End sub

任何身体都可以帮助我!!!!!!!!!!!!!!!!!!!!!!

1 个答案:

答案 0 :(得分:1)

在答复的一半以上,我意识到蒂姆的评论已经涵盖了这一点。如果我为此获得任何想象点,我会拆分它们!

这是你的代码应该是这样的:

Public Const gt As String = "=>21"

Sub main()
    sample (gt)
End Sub

Sub sample(grt As String)
    Selection.AutoFilter Field:=4, Criteria1:=grt
End Sub

如果您遇到类型不匹配错误,请指明它触发的代码行。另外,建议您自动过滤的列中使用的数据类型。