Saberexcel - o site das Macros
Macro do Aplicativo Microsoft Excel VBA verfica as células vazias de um determinado intervalo de células (Range), e nestas células vazias insere uma palavra. Veja o exemplo de Planilha, baixe-a no final da página.
Sub Inserir_palavra_em_celulas_branco()
Dim vCelula As Range
For Each vCelula In Range("A1:D100")
If IsEmpty(vCelula) Then vCelula = "em branco": vCelula.Font.ColorIndex = 5 ' esses dois (:) pontos é o mesmo que próxima linha (Linha debaixo)
Next vCelula
End Sub
Sub Copiar_para_teste()
Sheets("Plan2").Range("A1:D100").Copy
Sheets("Plan1").Select
Range("A1").Select
ActiveSheet.Paste
Range("E1").Select
Application.CutCopyMode = False
Range("E6").Select
End Sub
Sub Limpar()
[A1:D100].ClearContents
[A1].Select
End Sub
Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel
Baixe o exemplo de planilha contendo as macros acima
Excel planilha vba loop verifica celulas em branco insere palavra (24.16 kB)
Publicidade
Compre com garantia, segurança e ótimos preços nas lojas SubMarino
