Komórka koloru na podstawie wartości tekstu

Kolumna Excel zawiera wartość tekstową reprezentującą kategorię tego wiersza.

Czy istnieje sposób sformatowania wszystkich komórek o odrębnej wartości unikalnego koloru bez ręcznego tworzenia formatu warunkowego dla każdej wartości?

Przykład: gdybym miał kategorie bedroom, bedroom, bathroom, kitchen, living room, chciałbym, aby wszystkie zawierające komórki bedroombyły określonego koloru, bathroominnego koloru itp.

1. Skopiuj kolumnę, którą chcesz sformatować, do pustego arkusza.
2. Wybierz kolumnę, a następnie wybierz polecenie „Usuń duplikaty” z panelu „Narzędzia danych” na karcie „Dane” wstążki.
3. Po prawej stronie unikalnej listy wartości lub ciągów utwórz unikalną listę liczb. Na przykład, jeśli masz 6 kategorii do pokolorowania, druga kolumna może mieć po prostu 1-6. To jest twoja tabela odnośników.
4. W nowej kolumnie użyj VLOOKUPdo odwzorowania ciągu tekstowego na nowy kolor.
5. Zastosuj formatowanie warunkowe na podstawie nowej kolumny numerycznej.

Poniższe zrzuty ekranu pochodzą z programu Excel 2010, ale powinny być takie same dla 2007 r.

Wybierz komórkę i przejdź do Conditional Formatting | Highlight Cells Rules | Text that Contains

AKTUALIZACJA: Aby zastosować formatowanie warunkowe dla całego arkusza, zaznacz wszystkie komórki, a następnie zastosuj formatowanie warunkowe.

^{(Kliknij obraz, aby powiększyć)}

Teraz wybierz dowolne formatowanie.

From: http://www.mrexcel.com/forum/excel-questions/861678-highlighting-rows-random-colors-if-there-duplicates-one-column.html#post4185738

Sub ColourDuplicates()
Dim Rng As Range
Dim Cel As Range
Dim Cel2 As Range
Dim Colour As Long




Set Rng = Worksheets("Sheet1").Range("A1:A" & Range("A" & Rows.Count).End(xlUp).Row)
Rng.Interior.ColorIndex = xlNone
Colour = 6
For Each Cel In Rng


If WorksheetFunction.CountIf(Rng, Cel) > 1 And Cel.Interior.ColorIndex = xlNone Then
Set Cel2 = Rng.Find(Cel.Value, LookIn:=xlValues, LookAt:=xlWhole, MatchCase:=False, SearchDirection:=xlNext)
    If Not Cel2 Is Nothing Then
        Firstaddress = Cel2.Address
        Do
        Cel.Interior.ColorIndex = Colour
        Cel2.Interior.ColorIndex = Colour
            Set Cel2 = Rng.FindNext(Cel2)

        Loop While Firstaddress <> Cel2.Address
    End If




Colour = Colour + 1


End If
Next


End Sub

Automatyczne wybieranie koloru Formatowanie warunkowe nie jest funkcją programu Microsoft Excel.

Można jednak pokolorować cały wiersz na podstawie wartości kolumny kategorii indywidualnie.

1. Utwórz nową regułę formatowania w formatowaniu warunkowym.
2. Użyj formuły, aby określić, które komórki sformatować.
3. Wzór: =$B1="bedroom"(Zakładając, że kolumna kategorii to B)
4. Ustaw format (używając koloru wypełnienia)
5. Zastosuj formatowanie reguł do wszystkich komórek