如何在VBA中过滤''ő''字符?

Pba*_*s89 3 excel vba excel-vba-mac

我正在尝试在excel中构建一个适用于所有页面的过滤器,但是,由于我的语言,我有一个字符(ő)无法进入VBA编辑器.

有任何想法吗?

我目前正在使用此代码:

使用工作表(q)'在循环过程中选择每个工作表时,我们将Autofilter应用于特定条件.我们希望过滤掉名字以H .Range("A1")开头的所有人.自动过滤字段:= 1,标准1:=数组("Bazsalikom","Koriander","Barna Rizs","JázminRizs"," Fafülgomba","Csirke(elősütött","Tofu(kockázott)","Fejeskáposzta(csíkozott)","Kínaikel(szeletelt)","Szójacsíra","Vöröshagyma(csíkozott)","Marha(elősütött)"," Újhagyma(szeletelt)","Sárgarépa(csíkozott)","Karfiol(forrázott)","KápiaPaprika","Bambuszrügy(konzerv)","Sertés(elősütött)","Kacsa(elősütött)","Rák(mirelit) )","Csiperke Gomba","Cukkini(szeletelt)","Kaliforniai Paprika","Brokkoli(forrázott)","Ananász(konzerv - ételhez)"),运算符:= xlFilterValues以下一个q结束Sub结束

我突出了有问题的项目粗体.我在Mac上使用Office 2016.

Gar*_*ent 5

看来你有一个Unicode字符337 10 (基数10而不是十六进制).假设我们从:

在此输入图像描述

并应用AutoFilter:

Sub Macro99()
    Dim s As String

    s = ChrW(337)

    With Range("A1:A10")
        .AutoFilter
        .AutoFilter Field:=1, Criteria1:=s
    End With
End Sub
Run Code Online (Sandbox Code Playgroud)

将产生:

在此输入图像描述

您可以将其应用于任何或所有工作表.

  • 假设Windows区域设置设置为相应的代码页,也可以使用Alt + 0151直接键入. (2认同)
  • 很棒的答案......但是...对于那些可能不理解你的下标10的人来说,它有点令人困惑IMO表示它的十进制的unicode值...仍然支持你(加上你先把它打败了!) (2认同)