Freigeben über

Button.Placement Eigenschaft

  • Referenz

Definition

Namespace:
Microsoft.Office.Tools.Excel.Controls
Assembly:
Microsoft.Office.Tools.Excel.v4.0.Utilities.dll

Ruft ein Objekt ab, das angibt, wie Button an die darunter liegenden Zellen angefügt wird, oder legt dieses Objekt fest.

public:
 property System::Object ^ Placement { System::Object ^ get(); void set(System::Object ^ value); };
public object Placement { get; set; }
member this.Placement : obj with get, set
Public Property Placement As Object

Eigenschaftswert

Object

Einer der folgenden XlPlacement Werte: xlFreeFloating. xlMove. xlMoveAndSize.

Beispiele

Im folgenden Codebeispiel werden einem Arbeitsblatt zwei Button Steuerelemente mit unterschiedlichem Laufzeitverhalten hinzugefügt. Die erste Schaltfläche deckt den Bereich der Zellen B2 bis C3 ab. Wenn der Benutzer die Größe einer Spalte oder Zeile in diesem Bereich zur Laufzeit ändert, ändert die erste Schaltfläche die Größe, um sie an die Änderungen anzupassen. Die zweite Schaltfläche deckt den Bereich der Zellen B5 bis C6 ab, und die Placement Eigenschaft dieser Schaltfläche ist auf xlFreeFloatingfestgelegt. Wenn der Benutzer die Größe einer Spalte oder Zeile in diesem Bereich zur Laufzeit ändert, ändert die zweite Schaltfläche die Größe nicht.

Dieses Beispiel gilt für eine Anpassung auf Dokumentebene.

private void ComparePlacementBehavior()
{
    Microsoft.Office.Tools.Excel.Controls.Button cellButton =
        this.Controls.AddButton(this.Range["B2", "C3"],
        "cellButton");
    cellButton.Text = "Resizes with cells";

    Microsoft.Office.Tools.Excel.Controls.Button fixedButton =
        this.Controls.AddButton(this.Range["B5", "C6"],
        "fixedButton");
    fixedButton.Text = "Does not resize";
    fixedButton.Placement = Excel.XlPlacement.xlFreeFloating;
}

Private Sub ComparePlacementBehavior()

    Dim CellButton As Microsoft.Office.Tools.Excel.Controls.Button = _
        Me.Controls.AddButton(Me.Range("B2", "C3"), "CellButton")
    CellButton.Text = "Resizes with cells"

    Dim FixedButton As Microsoft.Office.Tools.Excel.Controls.Button = _
        Me.Controls.AddButton(Me.Range("B5", "C6"), "FixedButton")
    FixedButton.Text = "Does not resize"
    FixedButton.Placement = Excel.XlPlacement.xlFreeFloating
End Sub

Gilt für: