Поделиться через

Button.Placement Свойство

  • Ссылка

Определение

Пространство имен:
Microsoft.Office.Tools.Excel.Controls
Сборка:
Microsoft.Office.Tools.Excel.v4.0.Utilities.dll

Возвращает или задает объект, указывающий способ присоединения объекта Button к расположенным ниже ячейкам.

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

Значение свойства

Object

Одно из следующих XlPlacement значений: xlFreeFloating. xlMove. xlMoveAndSize.

Примеры

В следующем примере кода на лист добавляются два Button элемента управления с разным поведением во время выполнения. Первая кнопка охватывает диапазон ячеек от B2 до C3. Когда пользователь изменяет размер столбца или строки в этом диапазоне во время выполнения, первая кнопка будет изменять размер в соответствии с изменениями. Вторая кнопка охватывает диапазон ячеек от B5 до C6, а Placement свойство этой кнопки имеет значение xlFreeFloating. Когда пользователь изменяет размер столбца или строки в этом диапазоне во время выполнения, размер второй кнопки не изменится.

Этот пример предназначен для настройки на уровне документа.

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

Применяется к