如何定位从特定行开始的每第 n 行以更改字体颜色和样式?
How to target every nth row starting from a specific row to change font colour and style?
我想弄清楚如何定位从第 5 行开始的每 4 行,以便在找到文本时字体颜色为红色和粗体。
在上传的图片中,您会在第 5 行看到我有编辑权限,向下 4 行我又在那里...我希望能做到这一点,所以任何时候列中的条目都会是红色的并有底气。
这可能吗?
清除任何现有的条件格式,Select 第 5 行根据需要向下移动,然后开始 > 样式 - 条件格式,新规则...,使用公式来确定哪些单元格format 和 格式化值,其中此公式为真::
=MOD(ROW()-1,4)=0
格式..., select 格式选择 确定.
只需使用条件格式规则。如果您不想手动创建一个,这里是执行此操作的代码。
sub cfrEditAccess()
with worksheets("sheet1")
with .columns("B:AZ")
.FormatConditions.Delete
With .FormatConditions.Add(Type:=xlExpression, Formula1:="=$A1=""Edit Access""")
.font.Color = 255
.font.Bold = True
End With
end with
end with
end sub
我想弄清楚如何定位从第 5 行开始的每 4 行,以便在找到文本时字体颜色为红色和粗体。
在上传的图片中,您会在第 5 行看到我有编辑权限,向下 4 行我又在那里...我希望能做到这一点,所以任何时候列中的条目都会是红色的并有底气。
这可能吗?
清除任何现有的条件格式,Select 第 5 行根据需要向下移动,然后开始 > 样式 - 条件格式,新规则...,使用公式来确定哪些单元格format 和 格式化值,其中此公式为真::
=MOD(ROW()-1,4)=0
格式..., select 格式选择 确定.
只需使用条件格式规则。如果您不想手动创建一个,这里是执行此操作的代码。
sub cfrEditAccess()
with worksheets("sheet1")
with .columns("B:AZ")
.FormatConditions.Delete
With .FormatConditions.Add(Type:=xlExpression, Formula1:="=$A1=""Edit Access""")
.font.Color = 255
.font.Bold = True
End With
end with
end with
end sub