Question

我一直在使用条件格式公式=OR(B2=B1,B2=B3)来突出显示连续的重复项。然后我使用format painter将公式复制到excel表中的所有列。

我已经设置了一个按钮，除其他外，它会将工作簿复制到新工作簿中。我现在想在这个宏中包含上面的公式。我的最终目标是用星号（*）替换用这个公式找到的所有细胞。

我首先尝试将公式弹出到宏中作为起点 -

For Each sh In Destwb.Worksheets
With sh.UsedRange.FormatConditions _
     .Add(Type:=xlExpression, Formula1:="=OR(B2=B1,B2=B3)")

     .Interior.Color = RGB(198, 239, 206)

End With
Next sh

但这只会让看似随意突出的细胞混乱。我不知道我哪里出错了。即使是B栏的亮点都是错误的。 B1中的标题会影响这个吗？当我正常使用CF时，它不会。如何将CF唯一地扩展到所有列？

最后，我如何将格式化单元格替换为此公式？或者有更快/更简单的方法来实现这个目标吗？

我没有意识到我可以用这种方式添加自定义文本。这让我向前迈出了好几步。

考虑到Balinti的建议，我尝试了一种解决方法。我做了几个假设，结果证明是错的。我已经能够将CF输入到我原始工作簿中的数据数组中。它并不像把它放入表中那么简单，但是通过手动选择每列中的范围并输入CF我已经使它工作了。

我也不确定格式化是否会传入新工作表，因为我使用“选择性粘贴”命令将数组公式转换为新工作表中的值。但是，它确实带有非常方便的格式。

对我来说，这不是一个完美的解决方案，但它似乎到目前为止一直有效。我还需要测试当我更改日期并获取更新数据时会发生什么。知道我是否可以将此格式移动到我的宏中仍然会很有趣。有什么提示吗？

查找/替换有条件格式的单元格

0 个答案: