次の方法で共有


WorksheetBase.ProtectDrawingObjects プロパティ

図形が保護されているかどうかを示す値を取得します。

名前空間:  Microsoft.Office.Tools.Excel
アセンブリ:  Microsoft.Office.Tools.Excel.v4.0.Utilities (Microsoft.Office.Tools.Excel.v4.0.Utilities.dll 内)

構文

'宣言
Public ReadOnly Property ProtectDrawingObjects As Boolean
    Get
public bool ProtectDrawingObjects { get; }

プロパティ値

型: System.Boolean
図形が保護されている場合は true、それ以外の場合は false です。

次のコード例では、ProtectDrawingObjects プロパティの値を取得し、図形が保護されているかどうかを確認します。 図形が保護されていない場合、true に設定された DrawingObjects パラメーターと共に Protect メソッドが呼び出され、図形が保護されます。

この例は、ドキュメント レベルのカスタマイズ用に作成されています。

    Private Sub ProtectShapes()
        If Not Me.ProtectDrawingObjects Then
            If DialogResult.Yes = MessageBox.Show("Shapes in this worksheet " & _
                "are not protected. Protect shapes the worksheet?", "Example", _
                MessageBoxButtons.YesNo) Then

                ' Protect shapes, but do not change any 
                ' other protection type.
                 Me.Protect(DrawingObjects:=True, _
                    Contents:=Me.ProtectContents, Scenarios:=Me.ProtectScenarios, _
                    UserInterfaceOnly:=Me.ProtectionMode, _
                    AllowFormattingCells:=Me.Protection.AllowFormattingCells, _
                    AllowFormattingColumns:=Me.Protection.AllowFormattingColumns, _
                    AllowFormattingRows:=Me.Protection.AllowFormattingRows, _
                    AllowInsertingColumns:=Me.Protection.AllowInsertingColumns, _
                    AllowInsertingRows:=Me.Protection.AllowInsertingRows, _
                    AllowInsertingHyperlinks:=Me.Protection.AllowInsertingHyperlinks, _
                    AllowDeletingColumns:=Me.Protection.AllowDeletingColumns, _
                    AllowDeletingRows:=Me.Protection.AllowDeletingRows, _
                    AllowSorting:=Me.Protection.AllowSorting, _
                    AllowFiltering:=Me.Protection.AllowFiltering, _
                    AllowUsingPivotTables:=Me.Protection.AllowUsingPivotTables)
            End If
        End If

    End Sub 'ProtectShapes

private void ProtectShapes()
{
    if (!this.ProtectDrawingObjects)
    {
        if (DialogResult.Yes == MessageBox.Show("Shapes in this worksheet " +
            "are not protected. Protect shapes the worksheet?", "Example", 
            MessageBoxButtons.YesNo))
        {
            // Protect shapes, but do not change any 
            // other protection type.
            this.Protect(missing, true, this.ProtectContents, 
                this.ProtectScenarios, this.ProtectionMode,
                this.Protection.AllowFormattingCells,
                this.Protection.AllowFormattingColumns,
                this.Protection.AllowFormattingRows,
                this.Protection.AllowInsertingColumns,
                this.Protection.AllowInsertingRows,
                this.Protection.AllowInsertingHyperlinks,
                this.Protection.AllowDeletingColumns,
                this.Protection.AllowDeletingRows,
                this.Protection.AllowSorting,
                this.Protection.AllowFiltering,
                this.Protection.AllowUsingPivotTables);
        }
    }
}

.NET Framework セキュリティ

  • 直前の呼び出し元に対する完全な信頼。 このメンバーは、部分的に信頼されているコードから使用することはできません。 詳細については、「部分信頼コードからのライブラリの使用」を参照してください。

参照

参照

WorksheetBase クラス

Microsoft.Office.Tools.Excel 名前空間