Pessoal boa noite,
vejam se me ajudam,
Tenho valores na celula A1 E A3 a celula A2 esta vazia, como que eu faço para retornar num msgbox a celula que esta vazia neste caso a celula A2.
Mas posso ter varias celulas vazias na mesma planilha, como fazer ?
Adapte o código a seguir conforme sua necessidade:
Sub Células_Vazias() Dim cell As Variant Dim sEmpty As String For Each cell In Selection If IsEmpty(cell) Then sEmpty = sEmpty & vbCrLf & cell.Address End If Next cell MsgBox "Células vazias na seleção: " & vbCrLf & sEmpty End Sub
O código vai listar numa msgbox o endereço das células vazias da seleção atual. Só tome cuidado para não rodar este código com uma seleção muito extensa como uma coluna inteira selecionada ou a planilha inteira selecionada, pois provavelmente você vai travar o Excel. Recomendo evoluir o código para que redimensione a seleção somente para intervalo usado.
Abraços!
Rafael Issamu F. Kamimura
Moderador Oficial Microsoft Community - MCC (Contribuidor do Microsoft Community)
Foi útil? Clique na mãozinha
Conheça: