MS Excel-用基於顏色的單元格數量填充百分比的單元格？

Question

我正在尋找一個填充單元格值的數字，該數字基於多少個具有綠色的單元格。

范例1：

A1 B1 C1 D1 (E1- Answer '15%' will appear here)
G  NG NG NG (G= Green, NG= Not Green)

另一個例子：

A1 B1 C1 D1 (E1- Answer '30%' will appear here)
G  G  NG NG (G= Green, NG= Not Green)

=IF(GetFillColor(A1)=4,"1",AND IF(GetFillColor(A1:B1)=4,"2"), AND IF(GetFillColor(A1:C1)=4,"3"), AND IF(GetFillColor(A1:C1)=4,"4", "0"))

GetFillColour：

 Function GetFillColor(Rng As Range) As Long
    GetFillColor = Rng.Interior.ColorIndex
 End Function

任何幫助將不勝感激，謝謝！

Answer 1

嘗試使用以下方法更改您的getfillcolor函數：

Public Function getfillcolor(rng As Range, color As Long) As Integer
Dim i As Integer
Dim cell As Range
For Each cell In rng.Cells
    If cell.Interior.color = color Then
    i = i + 1
    Else
    End If
Next cell
getfillcolor = i
End Function

現在，您的總和直接在指定的單元格中。

Answer 2

如果您不介意使用輔助單元（而不使用VBA）：

• 創建一個命名公式： =GET.CELL(38,OFFSET(INDIRECT("RC",FALSE),-1,0))
  我叫我CellColour 。
• 將公式=CellColour 1單元格置於彩色單元格下方。
  公式中的“偏移量”告訴它查看上面的行。
• 該公式將顯示綠色的單元格（RGB = 0,255,0）的數字10。
• 現在使用一個簡單的公式來計算百分比： =COUNTIF(A2:D2,10)/COUNTA(A2:D2)

您需要按F9更新公式結果。

http://www.mrexcel.com/forum/excel-questions/20611-info-only-get-cell-arguments.html