2017-05-14 4 views
-1

In einer Excel-Tabelle mit Spalten Strings A1 enthalten, F1 usw. zum Beispiel:Excel - Farbcodierung und Formeln

A1, B1, E1, C1, D1, F1
A1, B1, E1, C1 , D1, F2
A1, B1, E2, C1, D1, F1

[1] möchten Sie eine Spalte erstellen, die mit "Ja" für Zellen mit der gleichen Anzahl von Zeichenfolgen, die mit 1 und 2, so enden?

Für z.B. Zeilen, die A1 B1 E1 C2 D2 F2,
oder

A2 B1 E1 C2 D1 F2

würden gekennzeichnet als "Ja"

[2] Farbcode die Zeilen enthalten, die eine haben " Ja "in [1]?

Vielen Dank im Voraus

+0

Bitte lesen Sie [Wie ein Minimal, Complete, und prüfbare Beispiel erstellen] (http://stackoverflow.com/help/mcve). –

Antwort

0

Ihre Daten in ColumnsA Unter der Annahme: F, wählen Sie bitte ColumnA: F und HOME> Styles - Bedingte Formatierung, Neue Regel ..., Verwenden Sie eine Formel, welche Zellen zu bestimmen zu formatieren und Format Werte, wobei diese Formel gilt::

=COUNTIF($A1:$F1,"*"&1)=COUNTIF($A1:$F1,"*"&2) 

Format ..., wählen Wahl der Formatierung, OK, OK.

Für die Yes Sie die gleiche Formel innerhalb IF verwenden: (. Wird nicht mit einer Mischung aus 1 und 2 in der gleichen Zelle arbeiten)

=IF(COUNTIF($A1:$F1,"*"&1)=COUNTIF($A1:$F1,"*"&2),"Yes") 

0

Sub wie dies tun würde, der Job, aber ändern Sie die NumberOfRows entsprechend. (Sie haben nicht gebeten, in der leeren Reihe anzuhalten).

Sub ChangeColor() 
NumberOfRows = 4 
For j = 1 To NumberOfRows 
    Yes = 0 
    For i = 1 To 6 
     If Right((Cells(j, i).Value), 1) = "1" Then 
      Yes = Yes + 1 
      Cells(1, i).Interior.Color = RGB(255, 255, 0) 
     End If 
    Next i 
    If (Yes = 3) Then 
     Cells(j, 7).Value = "Yes" 
     Rows(j).Interior.Color = RGB(255, 255, 0) 
    End If 
Next j 

End Sub