2017-05-14 112 views
-1

在Excel電子表格中,用含有字符串A1列,F1等例如:Excel中 - 顏色編碼和公式

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

[1]想要爲具有相同數量的字符串並以1和2結尾的單元格創建一個表示「是」的列嗎?

例如,含有 A1 B1 E1 C2 D2 F2,

A2 B1 E1 C2 D1 F2

將被標記爲 「是」

[2]顏色代碼,有一個行的行「是「在[1]中?

在此先感謝

+0

請閱讀[如何創建一個最小的,完整的,並且可驗證示例](http://stackoverflow.com/help/mcve)。 –

回答

0

假設你的數據在ColumnsA:F,請選擇ColumnA:F和HOME>樣式 - 條件格式,新規則......,使用公式來確定哪些小區格式化格式值,其中該公式爲真:

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

格式......,格式的選擇選擇,OK好吧

對於Yes你可以使用IF內相同的公式:(不會隨1,並在同一小區2混合工作)

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

0

子這樣做會該工作,但適當地更改NumberOfRows。 (你沒有要求停在空行)。

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 

結束子