vba单元格无色填充 在excel里面用vba能给单元格填充自定义的颜色吗？

在excel里面用vba能给单元格填充自定义的颜色吗？class=“answer text mb-10”> Sub xx（）Dim c As range对于[e3:j16]中的每个c选择Cas

在excel里面用vba能给单元格填充自定义的颜色吗？

class=“answer text mb-10”> Sub xx（）Dim c As range对于[e3:j16]中的每个c选择Case Len（c）Case 10:x=3 Case 9:x=6 Case 8:x=10 Case 7:x=5 Case Else:x=xlNoneEnd选择c.Interior.ColorIndex=xNextEnd您好，您的问题有一个先决条件：如果您的excel版本是2003，则只能使用预设的56种颜色。用VBA代码实现的其他填充颜色将转换为最接近56种颜色的颜色。如果您的excel版本是2007或更高版本，那么单元格填充颜色几乎是无限的。通过cell filling命令完全可以实现自定义颜色填充。它支持RGB和HSL模式，不需要VBA的帮助。如果使用VBA，代码如下：sub test（）“用红色、RGB（红色、绿色、蓝色）填充单元格A1，红色、绿色和蓝色的值为0-255。可以设置不同的值以获得不同的颜色。范围（“A1”）。内饰。颜色=RGB（255，0，0）“填充红色”如果要删除填充颜色，请使用以下句子范围（“A1”）内部。图案=如果数据在a列中，代码如下。

Sub AA（）

x=1至范围（“a65536”）。结束（xlup）。行“建立循环

如果单元格（x，1）=6，则”判断单元格值

单元格（x，1）内饰颜色索引=3“当单元格值等于6时，单元格中填充红色

end if

next x

end sub

1。打开excel表格并按alt F11]打开VBA编辑器，或单击菜单栏上的“开发工具”和“visual basic”打开VBA编辑器。

4. 您可以在“颜色”对话框的“开始”、“填充颜色”和“其他颜色”中找到它，并且可以更改该值以查看新颜色。

5. 点击VBA编辑器工具栏中的“运行”图标运行程序，符合条件的行将自动填充设置的颜色。

6. VBA自动填充符合条件的线条的颜色。

EXCELVBA填充单元格颜色？

谢谢。我擅长于技能。

在日常工作中，我们经常在Excel中突出表格数据的颜色，使数据的重要性一目了然。

虽然，这不是一个好习惯

！这里，我将介绍三种按颜色分类和汇总的方法

1。使用搜索功能按格式查找具有相同颜色的单元格；

2。选择所有相同的颜色区域；

3。定义与名称相同的颜色区域；

4。用名称替换公式中的区域，实现分类汇总；

动画演示如下：

实现步骤：

1。按颜色2。利用子函数实现对过滤数据的动态统计。

动画演示如下：

1。定义名称并输入公式=获取.CELL（63，A2）&Ampt（now（））动态获取单元格填充颜色；

2。添加一个辅助列，并在辅助列中输入公式：=name；

3。使用条件统计函数对统计数据进行分类，如SUMIF、CONTIFF等；

下面的动画演示：

如果你有一定的VBA基础，你可以用VBA来实现它

！好吧，我来回答这个问题。我希望我能帮助你

！谢谢。我很擅长技巧

EXCEL中如何用VBA将某个单元格填充颜色？

Universal excel当然有办法实现这种小案例；方法1：在VBA中编写颜色代码-->；然后返回excel--> view--> macro--> view macro--> options--> set shortcut key--> confirm。在后续操作中，只需选择需要设置颜色的表格，然后按设置快捷键即可。代码如下：；sub TST（）ActiveCell.Interior.ColorIndex颜色索引=20end sub；方法二：手工填充任意单元格，其他单元格默认使用内置快捷键F4重复上一步操作，符合要求。