Excel VBA条件格式满足条件将对应的单元格字体变色

发布网友发布时间：2022-06-21 01:13

共4个回答

热心网友时间：2024-08-10 17:55

选中K列B行单元格
条件格式 —— 新建规—— 使用公式确定要设置格式的单元格
为符合此公式的值设置格式：
点击选中的单元格点击后会出现 =$K2
接着在后面输入 <>""
然后设置格式(F) 选一个填充色
点确定
再点条件格式—— 管理规则 —— 选择新建的那个规
应用于下面选中数据区域
点确定就行了

填完后，单元格往下拉就出来效果了

热心网友时间：2024-08-10 17:55

选择B:I列
点击菜单---格式---条件格式---公式
=$K1<>""
点击"格式"设置字体颜色为*
确定.

别迷信神马VBA.

热心网友时间：2024-08-10 17:55

比如你要在A列是等于10的单元格字体红色，代码如下
Sub aa()
Dim c As Range
For Each c In Range("A1:A5")
If c.Value = 10 Then c.Font.ColorIndex = 3
Next c
End Sub
根据你的补充代码修改如下
Sub aa()
Dim c As Range
For Each c In Range("k1:k100")
If c.Value <> "" Then c.Offset(, -9).Resize(1, 8).Interior.ColorIndex = 6
Next c
End Sub追问试了，没反应啊

追答运行了吗？

热心网友时间：2024-08-10 17:56

for i=1 to acitvesheet.usedrange.count
if cells(11,i).value<>"" then
range(cells(2,i),cells(9,i).Interior.color=65535
end if
next追问你的有问题代码有红色的

Excel VBA条件格式 满足条件将对应的单元格字体变色

Excel VBA条件格式满足条件将对应的单元格字体变色