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

関連記事

: 印刷：余白を設定 TopMargin,BottomMargin,LeftMargin,RightMargin,HeaderMargin,FooterMargin

余白を設定する余白を設定する単位は、pt（ポイント：約 0.03528 cm） …

: ファイル保存の既定の形式を取得・設定（DefaultSaveFormat プロパティ）

DefaultSaveFormat プロパティ DefaultSaveForma …

: ワークシートをファイルに保存する（SaveAs メソッド）

SaveAs メソッドワークシートを名前を付けてファイルに保存します。Work …

: 印刷のページ区切り（DisplayPageBreaks プロパティ）

DisplayPageBreaks プロパティ印刷したあとや印刷プレビューを表 …

: シートを保護・保護したシートを解除する（Protect メソッド・Unprotect メソッド）

Protect メソッド・Unprotect メソッド Protect メソッド …

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

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

: ブック・シートの名前を取得・設定（Name プロパティ）

ワークブックの名前を取得 Name プロパティで、ワークブックの名前を取得します …

: 印刷位置を中央に設定（CenterHorizontally, CenterVertically）

PageSetup.CenterHorizontally プロパティ PageS …

: ウィンドウを拡大・縮小（Zoom プロパティ）

ウィンドウを拡大・縮小（Zoom プロパティ）ウィンドウの表示サイズをパーセン …

: 計算精度を設定する（PrecisionAsDisplayed プロパティ）

PrecisionAsDisplayed プロパティ PrecisionAsDi …

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