Verificar intervalo de células se vazias

Question

Como fazer, em VBA, para verificar se (IF) as células em determinado intervalo (C7:C35)  são vazias. É necessário loop para cada célula (For Each), ou pode ser feita a verificação de forma direta? ( p.e. If Range ("C7:C35) Empty ?????)". Grato.

Answer 1

É possível testar tudo de uma vez:

Sub Exemplo()

If WorksheetFunction.CountA(Range("C7:C35")) = 0 Then

'Intervalo vazio

Else

'Intervalo contém pelo menos uma célula preenchida

End If

End Sub

Answer 2

Janderson,

imagino que desejes saber quais células estão vazias, neste caso podes usar algo assim:

Sub teste()    For Each celula In Range("C1:C35")        If celula.Value = "" Then            retorno = retorno & vbCrLf & celula.Address        End If    Next    MsgBox retornoEnd Sub

Answer 3

Ok. Era o que eu precisava. Valeu. Obrigado.

Answer 4

Muito boa Benzadeus!

Answer 5

Obrigado. A solução poderá ser aplicada, se for o caso, entretanto o que eu preciso saber é se, há a possíbilidade de, em um único teste, portanto sem utilização de loop, identificar (de uma só vez...),  se o conjunto  todo (o intervalo de células) é vazio. Grato.