如何確定和識別Excel中單元格的背景色索引?
在某些情況下,當您收到包含多個彩色單元的工作表時,如下面的屏幕截圖所示,您可能需要識別這些顏色單元的背景顏色索引。 沒有內置功能可以確定單元格的顏色索引,但是,在本文中,我介紹了一些VBA代碼來快速解決Excel中的這項工作。
用VBA識別電池的顏色
用VBA識別電池的顏色
請按照以下步驟通過VBA確定單元格的顏色。
1。 按 Alt + F11鍵 啟用 Microsoft Visual Basic應用程序
窗口。
2。 點擊 插頁 > 模塊 打開一個新的 模塊 并將以下VBA代碼粘貼到空白腳本。 看截圖:
VBA:獲取單元格的傳統十六進制代碼
Function getRGB1(FCell As Range) As String
UpdatebyExtendoffice20170714
Dim xColor As String
xColor = CStr(FCell.Interior.Color)
xColor = Right("000000" & Hex(xColor), 6)
getRGB1 = Right(xColor, 2) & Mid(xColor, 3, 2) & Left(xColor, 2)
End Function
3.保存代碼并關閉VBA窗口。 選擇一個彩色單元格旁邊的空白單元格,鍵入此公式, = getRGB1(A16),然后將自動填充手柄拖到要使用的單元格上。 看截圖:
提示: 還有一些其他代碼可以識別單元格的顏色索引。
1. VBA:每個代碼的十進制值
Function getRGB2(FCell As Range) As String
UpdatebyExtendoffice20170714
Dim xColor As Long
Dim R As Long, G As Long, B As Long
xColor = FCell.Interior.Color
R = xColor Mod 256
G = (xColor \ 256) Mod 256
B = (xColor \ 65536) Mod 256
getRGB2 = "R=" & R & ", G=" & G & ", B=" & B
End Function
結果:
2. VBA:十進制值
Function getRGB3(FCell As Range, Optional Opt As Integer = 0) As Long
UpdatebyExtendoffice20170714
Dim xColor As Long
Dim R As Long, G As Long, B As Long
xColor = FCell.Interior.Color
R = xColor Mod 256
G = (xColor \ 256) Mod 256
B = (xColor \ 65536) Mod 256
Select Case Opt
Case 1
getRGB3 = R
Case 2
getRGB3 = G
Case 3
getRGB3 = B
Case Else
getRGB3 = xColor
End Select
End Function
結果:
在Excel范圍內快速選擇重復或唯一值
在Excel工作表中,如果您的范圍包含一些重復的行,則可能需要選擇它們或將其突出顯示,但是如何快速解決此工作?
Kutools for Excel,你可以
使用 選擇復制并 獨特的細胞 實用程序可快速選擇范圍內的重復項或唯一值,或為重復項和唯一值填充背景和字體顏色。
點擊查看 30 天免費試用!
Kutools for Excel:超過300個方便的Excel插件,免費試用,沒有限制 30 天。
相關文章:
如何在Excel中根據單元格值更改字體顏色?
如何在Excel中為重復的值或重復的行著色?
最佳辦公生產力工具
將小時轉化為分鐘 Kutools for Excel!
準備好增強您的 Excel 任務了嗎? 利用的力量 Kutools for Excel - 您終極的節省時間的工具。 簡化復雜的任務并像專業人士一樣瀏覽數據。 以閃電般的速度體驗 Excel!
為什么需要 Kutools for Excel

??? 超過 300 項強大功能: Kutools 包含 300 多項高級功能,可簡化您在 1500 多種場景中的工作。
?? 卓越的數據處理能力:合并單元格、刪除重復項并執行高級數據轉換 - 所有這些都不費吹灰之力!
?? 高效的批量操作:當你可以聰明地工作時,為什么還要付出額外的努力呢? 輕松批量導入、導出、組合和調整數據。
?? 可定制的圖表和報告:訪問各種附加圖表并生成富有洞察力的報告。
??? 強大的導航窗格:通過強大的列管理器、工作表管理器和自定義收藏夾獲得優勢。
?? 七種類型的下拉列表:通過各種功能和類型的下拉列表使數據輸入變得輕而易舉。
?? 用戶友好:對于初學者來說輕而易舉,對于專家來說是一個強大的工具。
立即下載,與 Excel 一起穿越時空!
閱讀更多
免費下載... 采購...
Office Tab 為 Office 帶來選項卡式界面,讓您的工作更輕松
在Word,Excel,PowerPoint中啟用選項卡式編輯和閱讀,發布者,Access,Visio和Project。
在同一窗口的新選項卡中而不是在新窗口中打開并創建多個文檔。
每天將您的工作效率提高50%,并減少數百次鼠標單擊!
版權聲明:本文內容由網絡用戶投稿,版權歸原作者所有,本站不擁有其著作權,亦不承擔相應法律責任。如果您發現本站中有涉嫌抄襲或描述失實的內容,請聯系我們jiasou666@gmail.com 處理,核實后本網站將在24小時內刪除侵權內容。
版權聲明:本文內容由網絡用戶投稿,版權歸原作者所有,本站不擁有其著作權,亦不承擔相應法律責任。如果您發現本站中有涉嫌抄襲或描述失實的內容,請聯系我們jiasou666@gmail.com 處理,核實后本網站將在24小時內刪除侵權內容。