Vba: como verificar se a célula está vazia (com exemplos)
Você pode usar a seguinte sintaxe básica para verificar se uma célula está vazia no VBA:
SubCheckBlank ()
Dim i As Integer
For i = 2 To 13
If IsEmpty(Range(" A " & i)) Then
Result = “ Cell is Empty ”
Else
Result = “ Cell is Not Empty ”
End If
Range(" B " & i) = Result
Next i
End Sub
Este exemplo específico verifica se cada célula no intervalo A2:A13 está vazia e, em seguida, atribui “Célula está vazia” ou “Célula não está vazia” a cada célula correspondente no intervalo B2:B13 .
O exemplo a seguir mostra como usar essa sintaxe na prática.
Exemplo: como verificar se a célula está vazia usando VBA
Suponha que temos a seguinte lista de nomes de times de basquete no Excel:
Suponha que queiramos verificar se cada célula do intervalo A2:A13 está vazia e, em seguida, exibir os resultados nas células correspondentes do intervalo B2:B8 .
Podemos criar a seguinte macro para fazer isso:
SubCheckBlank ()
Dim i As Integer
For i = 2 To 13
If IsEmpty(Range(" A " & i)) Then
Result = “ Cell is Empty ”
Else
Result = “ Cell is Not Empty ”
End If
Range(" B " & i) = Result
Next i
End Sub
Quando executamos esta macro, recebemos a seguinte saída:
A coluna B nos diz se cada uma das células correspondentes na coluna A está vazia ou não.
Você também pode usar a seguinte macro para simplesmente retornar o próprio nome da equipe na coluna B se o valor não estiver vazio na coluna A:
SubCheckBlank ()
Dim i As Integer
For i = 2 To 13
If IsEmpty(Range(" A " & i)) Then
Result = “ Cell is Empty ”
Else
Result = Range(" A " & i).Value
End If
Range(" B " & i) = Result
Next i
End Sub
Quando executamos esta macro, recebemos a seguinte saída:
A coluna B agora retorna o nome da equipe na coluna A se a célula não estiver vazia.
Nota : Você pode encontrar a documentação completa do método IsEmpty do VBA aqui .
Recursos adicionais
Os tutoriais a seguir explicam como realizar outras tarefas comuns em VBA:
VBA: Como contar ocorrências de caracteres em uma string
VBA: como verificar se uma string contém outra string
VBA: uma fórmula para “Se” a célula contém”