Vba: como usar “não gosto”? (com exemplos)
Você pode usar a instrução Not junto com a instrução Like no VBA para determinar se as strings não contêm um padrão específico.
Por exemplo, você pode usar a seguinte sintaxe para verificar se cada string no intervalo de células A2:A10 não contém a substring “hot” e exibir os resultados no intervalo 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
O exemplo a seguir mostra como usar essa sintaxe na prática.
Exemplo: como usar NOT LIKE em VBA
Suponha que temos a seguinte lista de alimentos na coluna A do Excel:
Podemos criar a seguinte macro para verificar se cada string na coluna A não contém a substring “quente” e exibir os resultados na coluna 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
Quando executamos esta macro, recebemos a seguinte saída:
A coluna B indica se cada célula correspondente na coluna A contém ou não a substring “quente”.
Nota : Usamos asteriscos ( * ) ao redor da substring para indicar que qualquer caractere pode vir antes ou depois da string “quente” na célula.
Recursos adicionais
Os tutoriais a seguir explicam como realizar outras tarefas comuns usando VBA:
VBA: Como contar ocorrências de caracteres em uma string
VBA: como verificar se uma string contém outra string
VBA: Como contar células com texto específico