wps或者excel表格内有一列数据,如何判断出这列数据里有函数,有函数临近单元格提示有函数或者改变颜色

有函数,则数据列临近单元格变色或者提示。A1有函数则B1提示,A3有函数则C3提示

Sub tst()
Dim i, j
For i = 1 To 100
For j = 1 To 100
If Cells(i, j).Formula Like "=*" Then
Cells(i, j + 1).Interior.Color = 65535
End If
Next
Next
End Sub


温馨提示:答案为网友推荐,仅供参考
第1个回答  2015-02-26
假设判断A列,是否有公式
单击 B1,ctrl+F3,名称位置输入aa
引用位置输入 =get.cell(6,a1)
添加,确定

在B1输入以下公式

=IF(LEFT(aa)="=","有公式","")追问

这只是判断一个单元格的,请问判断一列怎么操作呢

本回答被网友采纳
第2个回答  2015-02-25
=IF(ISFORMULA(A1),"A1单元格有公式","A1单元格冇公式")追问

wps里没有这个函数。。。在wps里怎么办呢

相似回答