Button.Placement Propriedade
Definição
Importante
Algumas informações se referem a produtos de pré-lançamento que podem ser substancialmente modificados antes do lançamento. A Microsoft não oferece garantias, expressas ou implícitas, das informações aqui fornecidas.
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, setPublic Property Placement As ObjectValor da propriedade
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