使用Sum公式查找单元格

时间:2017-10-31 18:32:52

标签: excel vba

我正在使用' .HasFormula'识别范围内的单元格。我想找到有'总和的单元格。公式,并保留这些,但保留所有其他公式。

'If it has Formula
If wb_DST.Sheets(sWs_DST).Range(GetColumnLetter(iColumn) & "13").HasFormula Then

'If it is a Sum Formula                               
If wb_DST.Sheets(sWs_DST).Range(GetColumnLetter(iColumn) & "13").HasFormula.Find("=SUM()", xlFormulas) Then
    wb_DST.Sheets(sWs_DST).Range(GetColumnLetter(iColumn) & "13:" & GetColumnLetter(iColumn) & wb_DST.Sheets(sWs_DST).UsedRange.Rows.Count).ClearContents    
Else 
'Nothing

End If

1 个答案:

答案 0 :(得分:0)

想一想, 你可以遍历'.HasFormula'范围内的所有单元格 然后比较'.formula'以查看它是否为总和, 只创建那些单元格的集合。

抱歉,我会放鳕鱼,但我不完全确定你要做什么,你可以发布你的代码片段,我会更好地为你更新我的答案。祝你好运:)