Excel VBA自动筛选百分比

时间:2018-03-07 11:09:33

标签: excel vba excel-vba percentage autofilter

我希望使用其增长率作为标准来过滤行业列表。 最后,我希望我的工作表显示行业增长> = 10%。

我要过滤的数据在Tabelle1第10列中,并显示为百分比。此外,我已经在Tabelle2 Cell B3上说明了我的标准10%(哪个应保持变量)。但是,在完成以下代码后,它向我展示了所有行业的增长率> = 0%。

有谁知道为什么以及如何根据我的需要调整它?

Sub AutoFilter()
Dim Bereich As Range
Dim Variable As Long

Set Bereich = Tabelle1.UsedRange
Variable = Tabelle2.Range("B3").Value

Bereich.AutoFilter Field:=10, Criteria1:=">=" & Variable

End Sub

谢谢:)

1 个答案:

答案 0 :(得分:0)

如果不是加倍,你的变量至少需要浮点数,因为例如12%等于0.12

而.AutoFilter属性似乎总是​​期望' en-US'语言环境值因此以下代码应该起作用:

Sub AutoFilter()
    Dim Bereich As Range, Variable As Double

    Set Bereich = Tabelle1.UsedRange
    Variable = Tabelle2.Range("B3").Value

    Bereich.AutoFilter Field:=10, Criteria1:=">=" & Replace(Variable, ",", ".")
End Sub