Pessoal Boa Noite,
Este código abaixo estou adaptando para que em uma coluna quando houver células vazias ele coloque traços nestas células. Gostaria que alguém me ajudasse como faço para que estes traços sejam em negrito. Já fiz alguns testes mas ainda não consegui fazer que esta situação funciona-se. Agradeço novamente.
Sub Preenchecélulavazia()
'Desliga a atualização da tela para melhorar o desempenho
Application.ScreenUpdating = False
On Error Resume Next
'Olha para a célula C
With ActiveSheet.Range("C3:C162")
'Preenche células vazias com traços
.SpecialCells(xlCellTypeBlanks).Value = "---"
End With
Err.Clear
Application.ScreenUpdating = True
End Sub
Segue exemplo...
fcarlos eu fiz o teste e a alteração ocorre em todas as células, necessito apenas que as alterações fossem feitas somente nas células vazias. Obrigado pela ajuda.
Dá uma olhada.
fcarlos esta versão funciona, só que tentei adicionar um botão para ela e não aparece como macro. Que tipo de botão posso usar para que o código fique disponível. Obrigado pela ajuda.
Precisa de um módulo.
Crie um Módulo no Projeto VBA
Depois crie uma Sub...
Sub Negrito()
'coloque aqui o seu código
End Sub
Criei a Sub e ficou beleza. Agradeço a sua ajuda.