シートが保護されているか確認（ProtectContents プロパティ）
2015/07/08
ProtectContents プロパティ
ワークシートが保護されているかどうかを調べます。返される値はブール型（Boolean）で、保護されている場合は True 、保護されていない場合は False を返します。
result = Object.ProtectContents
引数・戻り値
- object ・・・ 対象となる Worksheet オブジェクト
- result ・・・ ワークシートが保護されている場合は、True、保護されていない場合は、Fasle。
シートを保護するには、Protect メソッド、解除するには、Unprotect メソッドを使用します。
⇒ シートを保護・保護したシートを解除する を参照
ProtectContents プロパティは、Chart オブジェクト（グラフシート）を対象オブジェクトとして指定することもできます。
⇒ グラフが保護されているか確認（ProtectContents プロパティ） を参照
ProtectContents プロパティ 使用例
サンプルVBAソース
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 |
Sub Sample_ProtectContents() If ActiveSheet.ProtectContents = True Then MsgBox "ワークシートは保護されています。" Else MsgBox "ワークシートは保護されていません。" End If End Sub |
実行結果
関連記事
-
-
ワークシートをファイルに保存する（SaveAs メソッド）
SaveAs メソッド ワークシートを名前を付けてファイルに保存します。Work …
-
-
ブックが互換モードで開いているか確認する（Excel8CompatibilityMode プロパティ）
ブックが互換モードで開いているか確認する Excel8Compatibility …
-
-
ブックの表示を変更（View プロパティ）
ブックの表示を変更（View プロパティ） View プロパティ で、ブックの表 …
-
-
再計算（Calculation, EnableCalculation, Calculate）
ワークブックやシートの再計算 通常、Excel では、自動的に再計算が行われる設 …
-
-
印刷範囲の設定・解除（PageSetup.PrintArea プロパティ）
PageSetup.PrintArea プロパティ 印刷範囲を設定するには、Pa …
-
-
新しいウィンドウを開く（NewWindow メソッド）
NewWindow メソッド NewWindow メソッドで、任意のブックのコピ …
-
-
印刷設定（先頭ページのヘッダー・フッターを設定）DifferentFirstPageHeaderFooter, FirstPage
先頭ページに別のヘッダーおよびフッターを設定 先頭ページのヘッダーおよびフッター …
-
-
ウィンドウを整列（Windows.Arrange メソッド）
ウィンドウを整列（Windows.Arrange メソッド） Windows コ …
-
-
行列番号を含めて印刷（PageSetup.PrintHeadings プロパティ）
PageSetup.PrintHeadings プロパティ PageSetup. …
-
-
Excel を全画面表示（DisplayFullScreen プロパティ）
DisplayFullScreen プロパティ DisplayFullScree …