シートが保護されているか確認（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 |
実行結果
関連記事
-
-
印刷のページ区切り（DisplayPageBreaks プロパティ）
DisplayPageBreaks プロパティ 印刷したあとや印刷プレビューを表 …
-
-
印刷の用紙サイズを設定（PageSetup.PaperSize プロパティ）
PageSetup.PaperSize プロパティ PageSetup.Pape …
-
-
印刷設定（偶数ページのヘッダー・フッターを設定）OddAndEvenPagesHeaderFooter, EvenPage
偶数ページに別のヘッダーおよびフッターを設定 偶数ページのヘッダーおよびフッター …
-
-
Excel を全画面表示（DisplayFullScreen プロパティ）
DisplayFullScreen プロパティ DisplayFullScree …
-
-
印刷・印刷プレビュー（PrintOut メソッド、PrintPreview メソッド）
PrintOut メソッド 印刷するには、PrintOut メソッド を使用しま …
-
-
印刷位置を中央に設定（CenterHorizontally, CenterVertically）
PageSetup.CenterHorizontally プロパティ PageS …
-
-
シート見出しの色を設定（Tab プロパティ）
シート見出しの色を設定 Tab オブジェクトの Color プロパティ、Colo …
-
-
ページ数に合わせて印刷（FitToPagesTall, FitToPagesWide）
PageSetup.FitToPagesTall プロパティ PageSetup …
-
-
シートを保護・保護したシートを解除する（Protect メソッド・Unprotect メソッド）
Protect メソッド・Unprotect メソッド Protect メソッド …
-
-
ワークシートの数を数える（Count プロパティ）
Count プロパティ 指定したWorksheets コレクションやSheets …