Button.Placement Propriété

Définition

Espace de noms:

Microsoft.Office.Tools.Excel.Controls

Assembly:

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

Obtient ou définit un objet qui indique la façon dont Button est attaché aux cellules situées en dessous de lui.

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

Valeur de propriété

Object

Une des valeurs suivantes XlPlacement : xlFreeFloating. xlMove. xlMoveAndSize.

Exemples

L’exemple de code suivant ajoute deux Button contrôles qui ont un comportement d’exécution différent à une feuille de calcul. Le premier bouton couvre la plage de cellules B2 à C3. Lorsque l’utilisateur redimensionne une colonne ou une ligne de cette plage au moment de l’exécution, le premier bouton est redimensionné pour s’adapter aux modifications. Le deuxième bouton couvre la plage des cellules B5 à C6, et la Placement propriété de ce bouton est définie sur xlFreeFloating. Lorsque l’utilisateur redimensionne une colonne ou une ligne de cette plage au moment de l’exécution, le deuxième bouton ne change pas de taille.

Cet exemple concerne une personnalisation au niveau du document.

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