По този начин маркирате текстове в таблиците си
Ако искате да маркирате цялото нечислово съдържание в таблиците си, има няколко начина да го направите. Един от вариантите е да маркирате текстовете, като използвате подходящо условно форматиране.
Друг вариант е да работите с макрос. Следният макрос маркира цялото текстово съдържание в текущата таблица с червен цвят на фона:
Sub MarkTexts ()
Dim Cell As Range
За всяка клетка в ActiveSheet.UsedRange
Ако IsNumeric (Cell.Value) = False Тогава
Cell.Interior.ColorIndex = 3
Иначе
Cell.Interior.ColorIndex = xlColorIndexNone
Край Ако
Следващата клетка
End Sub
На фигурата можете да видите таблица след началото на макроса. Цветът на фона на цялото числово съдържание е непроменен. Цялото текстово съдържание е получило цвят на червена клетка.
Ако искате да използвате различен цвят вместо червен, заменете числото 3 в присвояването на стойността на свойството ColorIndex по друга стойност.
Съвет: Ако искате да знаете как да въвеждате и стартирате макроси в Excel, ще намерите кратко описание тук: www.exceldaily.de/excel-makros-vba/artikel/d/so-gend-sie-makros-in -excel- a.html