Excel VBA取得儲存格顏色代碼
Excel VBA如何取得「儲存格」的「顏色代碼」？如：取得下列各個顏色的代碼。
選取儲存格顏色代碼
※輸入以下指令※
Sub GetColor()
MsgBox Selection.Interior.ColorIndex
End Sub
點選「開發人員」-「巨集」或按下「Ctrl」+「F8」快捷鍵，並「執行」巨集。
則顯示出所選取儲存格的「顏色代碼」，如A1儲存格「藍色」代碼為「23」。
如A2儲存格「紅色」代碼為「3」。
整列儲存格顏色代碼
※輸入以下指令※
Sub GetColor2()
N = ActiveSheet.UsedRange.Rows.Count
For i = 1 To N
Cells(i, 2).Value = Cells(i, 1).Interior.ColorIndex
Next
End Sub
按下「Ctrl」+「F8」快捷鍵，並「執行」巨集。
則列出整列儲存格的「顏色代碼」。
