Отметить тексты и буквы

Anonim

Вот как вы отмечаете тексты в таблицах

Если вы хотите пометить все нечисловое содержимое в таблицах, это можно сделать несколькими способами. Один из вариантов - разметка текстов с использованием соответствующего условного форматирования.

Другой вариант - работа с макросом. Следующий макрос помечает все текстовое содержимое в текущей таблице красным цветом фона:

Sub MarkTexts ()
Тусклая ячейка как диапазон
Для каждой ячейки в ActiveSheet.UsedRange
Если IsNumeric (Cell.Value) = False, то
Cell.Interior.ColorIndex = 3
Еще
Cell.Interior.ColorIndex = xlColorIndexNone
Конец, если
Следующая ячейка
Конец подписки

На рисунке вы можете увидеть таблицу после запуска макроса. Цвет фона всего числового содержимого не изменился. Все текстовое содержимое выделено красным цветом.

Если вы хотите использовать другой цвет вместо красного, замените цифру 3 в присвоении значения свойству. ColorIndex на другое значение.

Совет: Если вы хотите узнать, как вводить и запускать макросы в Excel, вы найдете здесь краткое описание: www.exceldaily.de/excel-makros-vba/artikel/d/so-gend-sie-makros-in -excel- a.html