エクセルVBAのErrorCheckingOptionsオブジェクトについて

ErrorCheckingOptionsオブジェクトについての解説になります。

• Applicationオブジェクト
  • ErrorCheckingOptionsオブジェクト
    • Dialog

目次

• ErrorCheckingOptionsオブジェクトとは
• シート見出しの色を設定するサンプルコード
  • 実行結果
  • 解説
• ErrorCheckingOptionsオブジェクトの親オブジェクト一覧
• ErrorCheckingOptionsオブジェクトのプロパティ一覧

ErrorCheckingOptionsオブジェクトとは

ErrorCheckingOptionsオブジェクトは、アプリケーションのエラー チェックのオプションを表します。

ErrorCheckingOptions オブジェクトを取得するには、Application オブジェクトの ErrorCheckingOptions プロパティを使用します。エラー チェックの各オプションに対応するインデックス番号の一覧については、Errors オブジェクトの Item プロパティを参照してください。ErrorCheckingOptions オブジェクトが取得されると、次に示す ErrorCheckingOptions オブジェクトのプロパティを使って、エラー チェックのオプションを設定できます。

• BackgroundChecking
• EmptyCellReferences
• EvaluateToError
• InconsistentFormula
• IndicatorColorIndex
• NumberAsText
• OmittedCells
• TextDate
• UnlockedFormulaCells

次の使用例は、TextDate プロパティを使用して、2 桁年のテキスト日付のエラー チェックを有効にし、メッセージを表示します。

Sub CheckTextDates()
    Dim rngFormula As Range
    Set rngFormula = Application.Range("A1")
    Range("A1").Formula = "'00/04/23"
    Application.ErrorCheckingOptions.TextDate = True
    ' 2 桁年のテキスト日付のエラー チェックが有効かどうか確認します。
    If rngFormula.Errors.Item(xlTextDate).Value = True Then
        MsgBox "2 桁年のテキスト日付のエラー チェックのオプションは有効です。"
    Else
        MsgBox "2 桁年のテキスト日付のエラー チェックのオプションは有効ではありません。"
    End If
End Sub

• ErrorCheckingOptionsプロパティ

シート見出しの色を設定するサンプルコード

こちらでは、シート見出しの色を設定するマクロになります。

Sub sample()

    Sheets("Sheet1").ErrorCheckingOptions.ColorIndex = 3

End Sub

実行結果

解説

こちらのマクロは、ErrorCheckingOptionsオブジェクトのColorIndexプロパティを利用しています。

ErrorCheckingOptionsオブジェクトの親オブジェクト一覧

ErrorCheckingOptionsオブジェクトのプロパティ一覧

• ErrorCheckingOptionsオブジェクト(ColorIndexプロパティ)のプロパティ

よく読まれているVBAのIE(InternetExplorer)操作関連記事

• 指定したURLをIE(InternetExplorer)で起動する
• InternetExplorer制御の準備（ライブラリ追加）
• HTMLドキュメント(全ての要素)を取得する
• HTMLDocumentのallオブジェクト
• webページのBasic認証自動ログイン「ieBasic」