條件爲格式的單元格中的參考文本顏色

Question

我們試圖完成的是在符合特定度量標準的條件格式化單元格中引用文本顏色。我們有一個for循環，用於檢查每個單元格的文本顏色。

通過條件格式化完成的彩色單元格無法通過font.color引用，因爲手動/ VBA彩色單元格（據我所知），所以我們正在尋找一種方法來引用條件格式化的顏色/外觀格式化功能並獲取顏色。

Dim rstarpos As Long 
Dim cstartpos1 As Long 

rstartpos = 9 
cstartpos1 = 3 

For i = rstartpos To 10 
Sheets("Scorecard").Select 
Cells(i, cstartpos1).Select 
MsgBox Cells(i, cstartpos1).Font.Color 

Font.color將理想地報告循環中單元格的字體顏色。但是，由於條件格式化，它不是。有沒有辦法調用條件格式化的單元格的顏色？

感謝您的幫助。

Answer 1

如果您使用的是Excel 2010，則可以使用某個範圍的DisplayFormat屬性來獲取顯示的格式，包括條件格式（和表格樣式）的效果。在您的例子，最後一行將變爲：

MsgBox Cells(i, cstartpos1).DisplayFormat.Font.Color

希望這有助於。