单元格没有公式 颜色自动标识(已经解决)

sparkguo

单元格没有公式 用颜色自动标识出来, 空文本不用标识.
谢谢大家的帮助.

[ 本帖最后由 sparkguo 于 2009-9-15 15:58 编辑 ]

jms126

设置了一个formular的名称

还设置了条件格式

详细公式见附件

[ 本帖最后由 jms126 于 2009-9-15 15:37 编辑 ]

LangQueS

Sub 标注所有无公式单元()
For Each c In ActiveSheet.UsedRange
    If c.Value <> "" And c.HasFormula = False Then    '判断单元不是空值且不包含公式
        c.Interior.ColorIndex = 40
    End If
Next
End Sub

sparkguo

谢谢两位的帮忙, 都可以达到要求.     辛苦了.

[ 本帖最后由 sparkguo 于 2009-9-15 16:03 编辑 ]

roseland

学习啦~谢谢！！！