在比较字符串vba时键入不匹配错误13

Question

这种语法有问题吗？

If xlwsIAR.Cells(x, 5).Text <> "FTD-OPEN" Or "FTD-CLOSE" Then
  ''action
  ''action
  ''action
End if

因为我试图检查一个单元格是否有特定的标准。

Answer 1

VB / VBA在比较条件中是特定的。虽然可以与常量数组进行比较，但您的语法可能更好地逐砖构建。

If UCase(xlwsIAR.Cells(x, 5).Text) <> "FTD-OPEN" And UCase(xlwsIAR.Cells(x, 5).Text) <> "FTD-CLOSE" Then

我投入了几个UCase functions，因为你的字符串常量是大写字母，而VBA字符串比较默认区分大小写。