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 を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

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

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

: ユーザー設定のドキュメントプロパティ（CustomDocumentProperties プロパティ）

CustomDocumentProperties プロパティユーザー設定のドキ …

: ウィンドウを整列（Windows.Arrange メソッド）

ウィンドウを整列（Windows.Arrange メソッド） Windows コ …

: 新しいウィンドウを開く（NewWindow メソッド）

NewWindow メソッド NewWindow メソッドで、任意のブックのコピ …

: 印刷時、シート内のエラーをどう扱うかを設定（PrintErrors プロパティ）

PageSetup.PrintErrors プロパティ PageSetup.Pr …

: 並べて比較（CompareSideBySideWith,SyncScrollingSideBySide,BreakSideBySide）

並べて比較（CompareSideBySideWith メソッド） Compar …

: ワークシートの追加・削除（Add メソッド・Delete メソッド）

新しいワークシートを作成 Add メソッドで、新しいワークシートを指定した場所に …

: シート見出しの表示・非表示（DisplayWorkbookTabs プロパティ）

シート見出しの表示・非表示（DisplayWorkbookTabs プロパティ） …

: ブックを別名で保存（SaveAs メソッド）

ブックを別名で保存（SaveAs メソッド）ブックの変更を保存したり、新規ブッ …

: 印刷のタイトル行、タイトル列を設定（PrintTitleRows,PrintTitleColumns）

PageSetup.PrintTitleRows プロパティ PageSetup …

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