指定顏色求和

john2006168

想問一下,有沒有excel公式是可以指定顏色計算總數.
例如:每個月有幾個vendor要優先付款的,用黃色顥示,只計算有顏色每個vendor的總和,結果如I欄

samwang

想問一下,有沒有excel公式是可以指定顏色計算總數.
例如:每個月有幾個vendor要優先付款的,用黃色顥示,只計 ...
john2006168 發表於 2022-5-24 13:31

請測試看看，謝謝
Sub test()
Dim xR As Range, R%, MyClr
For Each xR In Range([h1], Cells(Rows.Count, 2).End(3))
    MyClr = xR.DisplayFormat.Interior.ColorIndex
    If MyClr <> -4142 Then
        R = xR.Row
        Cells(R, 9) = Cells(R, 9) + xR
    End If
Next
End Sub

john2006168

回復 2# samwang
謝謝幫忙,因為excel不可以有vba程式存在,所以這個方法暫時不行.
另外,剛測試,如果有其他顏色也會計算進去.不可以只是計算黃色求和.最後,如果執行多一次,數值會一直累加.

hcm19522

https://blog.xuite.net/hcm19522/twblog/205029860