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

ブックが互換モードで開いているか確認する（Excel8CompatibilityMode プロパティ）

2015/12/12

ブックが互換モードで開いているか確認する

Excel8CompatibilityMode プロパティで、ブックが互換モードで開いているかどうかを確認することができます。

【書式】

object.Excel8CompatibilityMode

引数・戻り値

object ・・・対象となる Workbook オブジェクトを指定します。
戻り値・・・ブール型（Boolean）の値を使用します。ブックが互換モードで開かれている場合は、True、そうでない場合は、False。

Excel8CompatibilityMode プロパティ使用例

サンプルVBAソース

　
Sub Sample_Excel8CompatibilityMode()

    Dim w As Workbook
    Set w = Workbooks.Open("C:\Documents\test03.xls")
    
    If w.Excel8CompatibilityMode = True Then
        MsgBox w.Name & " は、互換モードです"
    Else
        MsgBox w.Name & " は、互換モードではありません"
    End If
    
    w.Close
    Set w = Nothing

End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

　

Sub Sample_Excel8CompatibilityMode()

Dim w As Workbook

Set w = Workbooks.Open("C:\Documents\test03.xls")

If w.Excel8CompatibilityMode = True Then

MsgBox w.Name & " は、互換モードです"

Else

MsgBox w.Name & " は、互換モードではありません"

End If

w.Close

Set w = Nothing

End Sub

　

実行結果

- ブック・シートの操作 Excel8CompatibilityMode プロパティ, VBA基本, Workbook オブジェクト, エクセルVBA, ブック・シートの操作

Tweet

Message コメントをキャンセル

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

関連記事

: ウィンドウ枠の固定（FreezePanes プロパティ、SplitColumn プロパティ,SplitRow プロパティ）

ウィンドウ枠の固定と解除ウィンドウ枠を固定するには FreezePanes プ …

: ワークシートを参照する（Worksheets プロパティ）

Worksheets プロパティ Worksheets プロパティは、Works …

: 印刷する用紙の向きを設定（PageSetup.Orientation プロパティ）

PageSetup.Orientation プロパティ PageSetup.Or …

: 数式を表示（DisplayFormulas プロパティ）

数式を表示（DisplayFormulas プロパティ）セルに数式が入力されて …

: ブック作成時のシート数の取得・設定（SheetsInNewWorkbook プロパティ）

SheetsInNewWorkbook プロパティ Excel で新規ブックに自 …

: 画面の上端・左端を設定（ScrollRow プロパティ、ScrollColumn プロパティ）

画面の上端・左端を設定 ScrollRow プロパティで、指定した行を画面上端に …

: 印刷設定（ヘッダー・フッターに画像を設定）Graphic オブジェクト

Graphic オブジェクト Graphic オブジェクトは、ヘッダーおよびフ …

: ワークシートをアクティブにする・選択する（Activate, Select）

Activate メソッド・Select メソッド Activate メソッドは …

: ブックのファイル形式を調べる（FileFormat プロパティ）

ブックのファイル形式を調べる（FileFormat プロパティ）指定したブック …

: 印刷の用紙サイズを設定（PageSetup.PaperSize プロパティ）

PageSetup.PaperSize プロパティ PageSetup.Pape …

PREV: ユーザー設定のビュー（CustomView オブジェクト）
NEXT: 指定したセルへ移動（Goto メソッド）