Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

対象のセル・セル範囲に数式があるかどうか調べる（HasFormula プロパティ）

2015/06/16

HasFormula プロパティ

HasFormula プロパティは、対象のセル・セル範囲すべてに数式が入力されている場合は、True を返し、セル・セル範囲すべてに数式が入力されていない場合は、False を返します。対象のセル範囲の一部分にのみ数式が入力されている場合は、Null 値 を返します。

【書式】

result = Object.HasFormula

引数・戻り値

object ・・・対象となる Range オブジェクト
result ・・・ True（数式が入力されている場合）。False（数式が入力されていない場合）。Null 値（一部に数式が入力されているなどそれ以外の場合）。

セルに数式を入力するには Formula プロパティ や FormulaR1C1 プロパティ を使用します。

HasFormula プロパティの使用例

サンプルVBAソース

　
Sub Sample_HasFormula()

    Dim myRng
    
    'インプットボックスメソッドで、セル範囲を指定
    Set myRng = Application.InputBox( _
        Prompt:="セル範囲を指定してください", _
        Title:="数式が入力されているかをチェック", _
        Type:=8 _
    )


    '選択範囲全てに数式が入力されている場合は「True」、全てに数式が入力されていない場合は「False」
    'それ以外の場合は「Null 値」と表示します
    
    If IsNull(myRng.HasFormula) Then
        
        MsgBox "Null 値"
    
    Else
    
        MsgBox myRng.HasFormula
    
    End If
    

End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26

27

28

29

　

Sub Sample_HasFormula()

Dim myRng

'インプットボックスメソッドで、セル範囲を指定

Set myRng = Application.InputBox( _

Prompt:="セル範囲を指定してください", _

Title:="数式が入力されているかをチェック", _

Type:=8 _

)

'選択範囲全てに数式が入力されている場合は「True」、全てに数式が入力されていない場合は「False」

'それ以外の場合は「Null 値」と表示します

If IsNull(myRng.HasFormula) Then

MsgBox "Null 値"

Else

MsgBox myRng.HasFormula

End If

End Sub

　

サンプルVBAソース実行前

（※「E3」「E4」「E5」セルには数式 [数量×単価] が入力されている）

実行（その１）

（※ 「E3」セルを選択）

実行（その２）

（※ 「C3」から「D5」のセル範囲を選択）

実行（その３）

（※ 「B2」から「E5」のセル範囲を選択）

- セルの操作 Formula プロパティ, FormulaR1C1 プロパティ, HasFormula プロパティ, Range オブジェクト, VBA基本, エクセルVBA, セルの操作, 数式

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: 数式を設定・取得する（Formula プロパティ・FormulaR1C1 プロパティ）

Formula プロパティ（FormulaR1C1 プロパティ） Formula …

: オートフィルタの設定と解除（AutoFilter メソッド）

AutoFilter メソッドオートフィルタを設定する場合、AutoFilte …

: 使用中のセル範囲を取得（UsedRange プロパティ）

UsedRange プロパティ UsedRange プロパティは、指定したワーク …

: 指定した条件に一致するセルを取得（SpecialCells メソッド）

SpecialCells メソッド SpecialCells メソッドは、指定し …

: セルに値を設定する・セルの値を参照する（Value プロパティ）

Value プロパティ Value プロパティは、セルの値を取得したり、値を設定 …

: 入力規則（入力時メッセージの設定）Validation オブジェクト

入力規則の入力時メッセージを表示する Validation.ShowInput …

: ハイパーリンク（Hyperlink オブジェクト）

Hyperlink オブジェクト Hyperlinks コレクションのメンバー …

: 対象のセルを直接参照しているセル全てを取得（DirectDependents プロパティ）

DirectDependents プロパティ DirectDependents …

: セルの値を置換・書式設定（Replace メソッド,ReplaceFormat プロパティ）

セルの値の置換と書式設定検索条件に一致するセルの書式を設定するには、まず、Ap …

: A1 形式と R1C1 形式を変換、相対参照と絶対参照を変換（ConvertFormula)

ConvertFormula メソッド数式で参照しているアドレスの相対参照と絶 …

PREV: 数式を設定・取得する（Formula プロパティ・FormulaR1C1 プロパティ）
NEXT: A1参照形式、R1C1参照形式の設定・取得（ReferenceStyle プロパティ）