Button.Application (Propiedad)

Obtiene un objeto Application que representa el creador del control Button.

Espacio de nombres:  Microsoft.Office.Tools.Excel.Controls
Ensamblado:  Microsoft.Office.Tools.Excel.v4.0.Utilities (en Microsoft.Office.Tools.Excel.v4.0.Utilities.dll)

Sintaxis

'Declaración
Public ReadOnly Property Application As Application
    Get

public Application Application { get; }

Valor de propiedad

Tipo: Microsoft.Office.Interop.Excel.Application
Un objeto Application que representa el creador del control Button.

Ejemplos

En el ejemplo de código siguiente se agrega un control Button a la hoja de cálculo actual. El controlador de eventos Click para este botón muestra los valores de las propiedades Creator y Application.

Se trata de un ejemplo para una personalización en el nivel del documento.

Private Sub DisplayCreatorAndApplication()
    Dim CreatorButton1 As Microsoft.Office.Tools.Excel.Controls.Button = _
        Me.Controls.AddButton(Me.Range("B2", "C3"), "CreatorButton1")
    CreatorButton1.Text = "Click to view creator and application"
    AddHandler CreatorButton1.Click, AddressOf CreatorButton_Click
End Sub

Private Sub CreatorButton_Click(ByVal sender As Object, ByVal e As EventArgs)
    Dim ClickedButton As Microsoft.Office.Tools.Excel.Controls.Button = _
        CType(sender, Microsoft.Office.Tools.Excel.Controls.Button)

    Dim ApplicationString As String = "The current application is " & _
        ClickedButton.Application.Name.ToString()

    If ClickedButton.Creator = Excel.XlCreator.xlCreatorCode Then
        MsgBox(ApplicationString & ". Created by Microsoft Excel")
    Else
        MsgBox(ApplicationString & _
            ". Created by an application other than Microsfot Excel")
    End If
End Sub

private void DisplayCreatorAndApplication()
{
    Microsoft.Office.Tools.Excel.Controls.Button creatorButton1 =
            this.Controls.AddButton(this.Range["B2", "C3"],
            "creatorButton1");
    creatorButton1.Text = "Click to view creator and application";
    creatorButton1.Click += new EventHandler(creatorButton_Click);
}

void creatorButton_Click(object sender, EventArgs e)
{
    Microsoft.Office.Tools.Excel.Controls.Button clickedButton =
        (Microsoft.Office.Tools.Excel.Controls.Button)sender;

    string applicationString = "The current application is " +
        clickedButton.Application.Name.ToString();

    if (clickedButton.Creator == Excel.XlCreator.xlCreatorCode)
    {
        MessageBox.Show(applicationString +
            ". Created by Microsoft Excel");
    }
    else
    {
        MessageBox.Show(applicationString +
            ". Created by an application other than Microsfot Excel");
    }
}

Seguridad de .NET Framework

• Plena confianza para el llamador inmediato. Un código de confianza parcial no puede utilizar este miembro. Para obtener más información, vea Utilizar bibliotecas de código que no es de plena confianza.

Vea también

Referencia

Button Clase

Microsoft.Office.Tools.Excel.Controls (Espacio de nombres)