我有一个符号和匹配的十六进制颜色的电子表格。我想用单元格内的十六进制颜色填充单元格本身（或其旁边的单元格）。我读过一些有关“条件格式”的内容，我认为这就是实现的方法。
我怎样才能达到我想要的结果？
条件格式无法实现所有颜色。
假设：Row1 包含数据标签，数据集没有间隙，十六进制颜色用于填充而不是字体，您已将十六进制颜色值（数字，而不是公式）解析为 C:E 列（R、G、B）并且您不需要经常这样做，那么 ColourCells 宏可能适合：
Sub ColourCells()
Dim HowMany As Integer
On Error Resume Next
Application.DisplayAlerts = False
HowMany = Application.InputBox _
(Prompt:="Enter last row number.", Title:="To apply to how many rows?", Type:=1)
On Error GoTo 0
Application.DisplayAlerts = True
If HowMany = 0 Then
Exit Sub
Else
Dim i As Integer
For i = 2 To HowMany
Cells(i, 3).Interior.Color = RGB(Cells(i, 3), Cells(i, 4), Cells(i, 5))
Next i
End If
End Sub
并在出现提示时输入您想要的 n 值。
示例输出和公式等：
Excel 的 RGB() 函数实际上创建了一个 BGR 值（我认为没有人知道为什么会说出原因），因此 Excel 以相反的顺序显示半字节。对于代码 Columns3,4,5 来说，这是合乎逻辑的，但图像中的 BGR 而不是传统的 RGB，我认为可能看起来很奇怪。对于图像中的 F，C3 值（LEFT'RGB'三）的手列是从应用中派生出来的RIGHT()到十六进制颜色。
本文内容由网友自发贡献，版权归原作者所有，本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容，请联系:hwhale#tublm.com(使用前将#替换为@)
