対象のセル・セル範囲に数式があるかどうか調べる(HasFormula プロパティ)
HasFormula プロパティ
HasFormula プロパティは、対象のセル・セル範囲すべてに数式が入力されている場合は、True を返し、セル・セル範囲すべてに数式が入力されていない場合は、False を返します。対象のセル範囲の一部分にのみ数式が入力されている場合は、Null 値 を返します。
result = Object.HasFormula
引数・戻り値
- object ・・・ 対象となる Range オブジェクト
- result ・・・ True(数式が入力されている場合)。False(数式が入力されていない場合)。Null 値(一部に数式が入力されているなどそれ以外の場合)。
セルに数式を入力するには Formula プロパティ や FormulaR1C1 プロパティ を使用します。
HasFormula プロパティの使用例
サンプルVBAソース
|
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」セルには数式 [数量×単価] が入力されている)
実行(その1)
(※ 「E3」セルを選択)
実行(その2)
(※ 「C3」から「D5」のセル範囲を選択)
実行(その3)
(※ 「B2」から「E5」のセル範囲を選択)
関連記事
-
-
オートフィルタ(平均より上・平均より下)AutoFilter メソッド
平均値よりも大きい(小さい)値のレコードを抽出 AutoFilter メソッドで …
-
-
重複するデータを削除(RemoveDuplicates メソッド)
RemoveDuplicates メソッド 指定したセル範囲から重複データを含む …
-
-
セル範囲内を検索(Find メソッド)
Find メソッド 指定したセル範囲内の特定の情報を含むセルを検索します。 【書 …
-
-
セル範囲を結合・結合を解除(MergeCells プロパティ)
MergeCells プロパティ MergeCells プロパティは、指定したセ …
-
-
引数に指定したセル範囲の共通のセル範囲を取得(Intersect メソッド)
Intersect メソッド Intersect メソッドは、引数に指定したセル …
-
-
任意のセルを含む行または列全体を参照(EntireRow プロパティ,EntireColumn プロパティ)
EntireRow プロパティ・EntireColumn プロパティ Entir …
-
-
フリガナ(Phonetic プロパティ)
Phonetic プロパティ 文字列(漢字など)をキーボードから入力した時の「読 …
-
-
セルの行番号または列番号を取得(Row プロパティ,Column プロパティ)
Row プロパティ・Column プロパティ Row プロパティは、指定したセル …
-
-
罫線の設定(Borders プロパティ)
罫線の設定 罫線を一括(上下左右すべて)で設定するには、Borders プロパテ …
-
-
書式で検索(Find メソッド,FindFormat プロパティ)
書式で検索 書式を条件にセルを検索する場合、まず、その書式条件を CellFor …






