HasFormula関数で数式セルを特定

 

Sub test()
    'HasFormula関数で数式が入っているセルを特定
    Dim i   As Long

    For i = 4 To 8

         '  セルに数式が入っているならHasFormula関数の戻り値は「true」
        If Cells(i, "D").HasFormula Then
                ' 数式が入っているセルを黄色塗りにする
                Cells(i, "D").Interior.Color = vbYellow
        End If
    
    Next i

 


End Sub

 

 

実行結果

 

 

― ― ― ― ― ― ― ― ― ― → Excel VBA基礎入門もくじ へ戻る 

 

参考記事