vba 设置填充颜色 条件格式公式的问题

lumo3217

用vba 设置填充颜色 条件格式公式的问题
Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
        "=MOD(row(),2)=1"

这里条件格式用的公式，能用变量吗
比如：
Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
        "=MOD(row()-selection.row,2)=1"

MOD(row()-7,2)=1  
其中7是选中的行，随机变动

有没有办法来用变量表达呀

ivccav

公式改为：""=MOD(row()-CELL(""row""),2)=1"，
双击单元格时CELL("row")会获取活动单元格行号

taller

Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
        "=MOD(row()-" & selection.row & ",2)=1"

lumo3217

taller 发表于 2023-1-6 12:39
Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
        "=MOD(row()-" & selection.r ...

O(∩_∩)O哈哈~   原来是我引号的问题，谢谢版主！已解决！感谢！

lumo3217

ivccav 发表于 2023-1-6 12:12
公式改为：""=MOD(row()-CELL(""row""),2)=1"，
双击单元格时CELL("row")会获取活动单元格行号

谢谢，虽然没有解决我的问题，但提供了一个很好的思路，学习了！感谢！

ivccav

lumo3217 发表于 2023-1-6 14:06
谢谢，虽然没有解决我的问题，但提供了一个很好的思路，学习了！感谢！

你没描述清楚，我以为你要用工作表公式获取活动单元格行号。