Vba: como usar "se não estiver vazio"

Você pode usar Not IsEmpty no VBA para verificar se uma célula não está vazia.

Aqui está um exemplo de como você pode usar essa sintaxe em uma macro:

 Sub IfNotBlank()
    Dim i As Integer

    For i = 2 To 13
        If Not IsEmpty(Range(" A " & i)) Then
        Result = “ Cell is Not Empty ”
        Else
        Result = “ Cell is Empty ”
        End If
    Range(" B " & i) = Result
    Next i
End Sub

Este exemplo específico verifica se cada célula no intervalo A2:A13 não está vazia e, em seguida, imprime “Célula não vazia” ou “Célula vazia” para cada célula correspondente no intervalo B2:B13 .

O exemplo a seguir mostra como usar essa sintaxe na prática.

Exemplo: como usar “Se não estiver vazio” em 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 não está vazia e, em seguida, exibir os resultados nas células correspondentes do intervalo B2:B8 .

Podemos criar a seguinte macro para fazer isso:

 Sub IfNotBlank()
    Dim i As Integer

    For i = 2 To 13
        If Not IsEmpty(Range(" A " & i)) Then
        Result = “ Cell is Not Empty ”
        Else
        Result = “ Cell is 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:

 Sub IfNotBlank()
    Dim i As Integer

    For i = 2 To 13
        If Not IsEmpty(Range(" A " & i)) Then
        Result = Range(" A " & i).Value
        Else
        Result = " Empty "
        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”