Button.Placement Propriedade

Definição

Namespace:

Microsoft.Office.Tools.Excel.Controls

Assembly:

Microsoft.Office.Tools.Excel.v4.0.Utilities.dll

Obtém ou define um objeto que indica a maneira como o Button é anexado às células abaixo dele.

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

Valor da propriedade

Object

Um dos seguintes XlPlacement valores: xlFreeFloating. xlMove. xlMoveAndSize.

Exemplos

O exemplo de código a seguir adiciona dois Button controles que têm um comportamento de tempo de execução diferente a uma planilha. O primeiro botão cobre o intervalo de células B2 a C3. Quando o usuário redimensiona uma coluna ou linha nesse intervalo em tempo de execução, o primeiro botão redimensionará para ajustar-se às alterações. O segundo botão cobre o intervalo de células B5 a C6 e a Placement propriedade desse botão é definida xlFreeFloatingcomo . Quando o usuário redimensiona uma coluna ou linha nesse intervalo em tempo de execução, o segundo botão não alterará o tamanho.

Este exemplo destina-se a uma personalização no nível de documento.

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