整列的颜色非空单元格
Color non empty cell of an entire column
我想为 sheet 中列的非空单元格着色。
我更愿意用条件格式来做
当我在没有 vba 的情况下进行设置时,它看起来像:
我试过了
.Columns(7).FormatConditions.Add(Type:=xlExpression,_
Formula1:="=G:G<> """"").Interior.Color = MyFormating
范围可以,但是公式不行
尝试:.Columns(7).FormatConditions.Add(Type:=xlExpression,_ Formula1:="=G1<> """"").Interior.Color = MyFormating
简要说明:
条件格式将假设所提供的公式适用于条件适用范围内的第一个单元格 (top-left)。 Excel 然后将调整每个单元格的公式。 (只要引用不是绝对的)
因此,如果您的条件适用于范围 G:G
,Excel 将使用如下条件公式:
对于G1
:.Columns(7).FormatConditions.Add(Type:=xlExpression,_ Formula1:="=G1<> """"").Interior.Color = MyFormating
对于G2
:.Columns(7).FormatConditions.Add(Type:=xlExpression,_ Formula1:="=G2<> """"").Interior.Color = MyFormating
对于G3
:.Columns(7).FormatConditions.Add(Type:=xlExpression,_ Formula1:="=G3<> """"").Interior.Color = MyFormating
等等..
这适用于两个方向,因此如果您将条件应用于多列(比如 G:L
),您将得到:
对于 H1:
.Columns(7).FormatConditions.Add(Type:=xlExpression,_ Formula1:="=H1<> """"").Interior.Color = MyFormating
对于I1
:
.Columns(7).FormatConditions.Add(Type:=xlExpression,_ Formula1:="=I1<> """"").Interior.Color = MyFormating
等等
我想为 sheet 中列的非空单元格着色。 我更愿意用条件格式来做
当我在没有 vba 的情况下进行设置时,它看起来像:
我试过了
.Columns(7).FormatConditions.Add(Type:=xlExpression,_
Formula1:="=G:G<> """"").Interior.Color = MyFormating
范围可以,但是公式不行
尝试:.Columns(7).FormatConditions.Add(Type:=xlExpression,_ Formula1:="=G1<> """"").Interior.Color = MyFormating
简要说明:
条件格式将假设所提供的公式适用于条件适用范围内的第一个单元格 (top-left)。 Excel 然后将调整每个单元格的公式。 (只要引用不是绝对的)
因此,如果您的条件适用于范围 G:G
,Excel 将使用如下条件公式:
对于G1
:.Columns(7).FormatConditions.Add(Type:=xlExpression,_ Formula1:="=G1<> """"").Interior.Color = MyFormating
对于G2
:.Columns(7).FormatConditions.Add(Type:=xlExpression,_ Formula1:="=G2<> """"").Interior.Color = MyFormating
对于G3
:.Columns(7).FormatConditions.Add(Type:=xlExpression,_ Formula1:="=G3<> """"").Interior.Color = MyFormating
等等..
这适用于两个方向,因此如果您将条件应用于多列(比如 G:L
),您将得到:
对于 H1:
.Columns(7).FormatConditions.Add(Type:=xlExpression,_ Formula1:="=H1<> """"").Interior.Color = MyFormating
对于I1
:
.Columns(7).FormatConditions.Add(Type:=xlExpression,_ Formula1:="=I1<> """"").Interior.Color = MyFormating
等等