如何在字符串比较中忽略大小写

Question

我有一个ExcelVBA公式：-

If [G56] = "Not Applicable" Then
    ...

区分大小写。我希望它忽略 "Not applicable".

的大小写

Answer 1

您可以只使用 LCase 函数：

If LCase([G56]) = "not applicable" Then

Answer 2

或在模块顶部添加Option Compare Text：

Option Explicit
Option Compare Text

Sub Test()
 MsgBox "Not Applicable" = "Not applicable" 'True
End Sub

Answer 3

你也可以使用比较字符串的专用函数：

Dim result As Integer

'// vbTextCompare does a case-insensitive comparison
result = StrComp("Not Applicable", "NOT APPLICABLE", vbTextCompare)

If result = 0 Then
    '// text matches
End If

在 this MSDN article

中有一些关于 StrCompare 方法的更多信息

Answer 4

最快的选择是

StrComp(LCase$("Not Applicable"), "not applicable", vbBinaryCompare)

如何在字符串比较中忽略大小写

How to ignore case in string comparison

excel

vba

excel-2013