Astfel marcați textele în tabelele dvs.
Dacă doriți să etichetați tot conținutul nenumeric din tabelele dvs., există mai multe moduri de a face acest lucru. O variantă este de a marca textele folosind formatarea condițională adecvată.
O altă variantă este de a lucra cu un macro. Următoarea macro marchează tot conținutul textului din tabelul curent cu o culoare de fundal roșie:
Sub MarkTexts ()
Dim Cell As Range
Pentru fiecare celulă din ActiveSheet.UsedRange
Dacă IsNumeric (Cell.Value) = False atunci
Cell.Interior.ColorIndex = 3
Altfel
Cell.Interior.ColorIndex = xlColorIndexNone
End If
Următoarea celulă
Sfârșitul Sub
În figură puteți vedea un tabel după începerea macro-ului. Culoarea de fundal a conținutului numeric este neschimbată. Întregul conținut text a primit o culoare de celulă roșie.
Dacă doriți să utilizați o culoare diferită în loc de roșu, înlocuiți numărul 3 din atribuirea valorii la proprietate ColorIndex cu o altă valoare.
Sfat: Dacă doriți să știți cum să introduceți și să porniți macrocomenzile în Excel, veți găsi o scurtă descriere aici: www.exceldaily.de/excel-makros-vba/artikel/d/so-gend-sie-makros-in -excel- a.html