2011-07-27 18:10:11 +0000 2011-07-27 18:10:11 +0000
23
23

Color Cell Based On Text Value

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

Czy istnieje sposób na sformatowanie wszystkich komórek o odrębnej wartości i unikalnym kolorze bez ręcznego tworzenia warunkowego formatu dla każdej wartości?

Przykład: Gdybym miał kategorie bedroom, bedroom, bathroom, kitchen, living room, chciałbym aby wszystkie komórki zawierające bedroom miały określony kolor, bathroom inny kolor itp.
Źródło

Odpowiedzi (4)

11
11
11
2011-07-27 19:55:10 +0000

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

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

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

(Kliknij obrazek, aby powiększyć)

Teraz po prostu wybierz formatowanie, które chcesz.

Źródło
6
6
6
2015-07-24 17:27:34 +0000
  1. Skopiuj kolumnę, którą chcesz sformatować, do pustego arkusza.
  2. Wybierz kolumnę, a następnie wybierz “Usuń duplikaty” z panelu “Data Tools” w zakładce “Data” na wstążce.
  3. Po prawej stronie unikalnej listy wartości lub ciągów znaków, zrób unikalną listę numerów. Na przykład, jeśli masz 6 kategorii do pokolorowania, druga kolumna może być tylko 1-6. Jest to Twoja tabela odnośników.
  4. W nowej kolumnie użyj VLOOKUP, aby zmapować łańcuch tekstowy na nowy kolor.
  5. Zastosuj formatowanie warunkowe oparte na nowej kolumnie numerycznej.
Źródło
2
2
2
2016-09-02 07:37:04 +0000

Od: 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
Źródło
1
1
1
2015-07-07 17:46:29 +0000

Automatyczne wybieranie kolorów przy Formatowaniu Warunkowym nie jest funkcją programu Microsoft Excel.

Można jednak pokolorować cały wiersz na podstawie wartości poszczególnych kolumn kategorii.

  1. Stwórz nową regułę formatowania w Formatowaniu Warunkowym.
  2. Użyj formuły, aby określić, które komórki mają być sformatowane.
  3. Formuła: =$B1="bedroom" (zakładając, że kolumna kategorii to B)
  4. Ustaw formatowanie (przy użyciu koloru wypełnienia)
  5. Zastosuj formatowanie reguł dla wszystkich komórek.
Źródło