Partager via


Button.Application, propriété

Obtient un objet Application qui représente le créateur de Button.

Espace de noms :  Microsoft.Office.Tools.Excel.Controls
Assembly :  Microsoft.Office.Tools.Excel.v4.0.Utilities (dans Microsoft.Office.Tools.Excel.v4.0.Utilities.dll)

Syntaxe

'Déclaration
Public ReadOnly Property Application As Application
public Application Application { get; }

Valeur de propriété

Type : Microsoft.Office.Interop.Excel.Application
Objet Application qui représente le créateur de Button.

Exemples

L'exemple de code suivant ajoute un contrôle Button à la feuille de calcul active.Le gestionnaire d'événements Click de ce bouton affiche les valeurs des propriétés Creator et Application.

Cet exemple illustre une personnalisation au niveau du document.

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");
    }
}

Sécurité .NET Framework

Voir aussi

Référence

Button Classe

Microsoft.Office.Tools.Excel.Controls, espace de noms