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

関連記事

: イベントの発生・無効をコントロール（EnableEvents プロパティ）

EnableEvents プロパティ EnableEvents プロパティに T …

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

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

: 表示されているセル範囲を取得（VisibleRange プロパティ）

VisibleRange プロパティ現在表示されているセル範囲（Range オ …

: ブックの表示を変更（View プロパティ）

ブックの表示を変更（View プロパティ） View プロパティで、ブックの表 …

: ブックのプロパティ（BuiltinDocumentProperties プロパティ）

BuiltinDocumentProperties プロパティブックのプロパテ …

: 共有ファイルを開いているユーザー情報を取得（UserStatus プロパティ）

共有ファイルを開いているユーザー情報を取得 UserStatus プロパティは、 …

: 新規ブック作成（Add メソッド）

新規にワークブックを作成する Workbooks コレクションの Add メソッ …

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

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

: ウィンドウの位置を入れ替える（ActivatePrevious メソッド、ActivateNext メソッド）

ウィンドウの位置を入れ替える ActivatePrevious メソッド、Act …

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

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

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