Vba：如何使用“不喜欢”？ （附例子）

您可以在 VBA 中使用Not语句和Like语句来确定字符串是否不包含特定模式。

例如，您可以使用以下语法检查单元格区域A2:A10中的每个字符串是否不包含子字符串“hot”，并在区域B2:B10中显示结果：

 SubCheckNotLike ()

    Dim i As Integer
    
    For i = 2 To 10
        If Not Range(" A " & i) Like " *hot* " Then
            Range(" B " & i) = " Does Not Contain hot "
        Else
            Range(" B " & i) = " Contains hot "
        End If
    Next i
    
End Sub

以下示例展示了如何在实践中使用此语法。

示例：如何在 VBA 中使用 NOT LIKE

假设 Excel 的 A 列中有以下食物列表：

我们可以创建以下宏来检查 A 列中的每个字符串是否不包含“热门”子字符串并将结果显示在 B 列中：

 SubCheckNotLike ()

    Dim i As Integer
    
    For i = 2 To 10
        If Not Range(" A " & i) Like " *hot* " Then
            Range(" B " & i) = " Does Not Contain hot "
        Else
            Range(" B " & i) = " Contains hot "
        End If
    Next i
    
End Sub

当我们运行这个宏时，我们会收到以下输出：

B 列指示 A 列中的每个匹配单元格是否包含“热门”子字符串。

注意：我们在子字符串周围使用星号 ( * ) 来指示任何字符都可以出现在单元格中“热门”字符串之前或之后。

其他资源

以下教程说明如何使用 VBA 执行其他常见任务：

VBA：如何计算字符串中字符的出现次数
VBA：如何检查一个字符串是否包含另一个字符串
VBA：如何计算具有特定文本的单元格