É assim que você marca textos em suas tabelas
Se você quiser rotular todo o conteúdo não numérico em suas tabelas, há várias maneiras de fazer isso. Uma variante é marcar os textos usando a formatação condicional apropriada.
Outra variante é trabalhar com uma macro. A macro a seguir marca todo o conteúdo de texto na tabela atual com uma cor de fundo vermelha:
Sub MarkTexts ()
Dim Cell As Range
Para cada célula em ActiveSheet.UsedRange
If IsNumeric (Cell.Value) = False Then
Cell.Interior.ColorIndex = 3
Outro
Cell.Interior.ColorIndex = xlColorIndexNone
Fim se
Próxima célula
End Sub
Na figura você pode ver uma tabela após o início da macro. A cor de fundo de todo o conteúdo numérico permanece inalterada. Todo o conteúdo do texto foi atribuído a uma cor de célula vermelha.
Se você quiser usar uma cor diferente em vez de vermelho, substitua o número 3 na atribuição de valor à propriedade ColorIndex por outro valor.
Dica: Se você gostaria de saber como inserir e iniciar macros no Excel, você encontrará uma breve descrição aqui: www.exceldaily.de/excel-makros-vba/artikel/d/so-gend-sie-makros-in -excel- a.html