Partager via


ListObject.Selected, événement

Se produit lorsque le contrôle ListObject est sélectionné.

Espace de noms :  Microsoft.Office.Tools.Excel
Assembly :  Microsoft.Office.Tools.Excel (dans Microsoft.Office.Tools.Excel.dll)

Syntaxe

'Déclaration
Event Selected As DocEvents_SelectionChangeEventHandler
event DocEvents_SelectionChangeEventHandler Selected

Notes

Cet événement est déclenché lorsque la sélection passe au contrôle ListObject.

Exemples

L'exemple de code suivant crée un ListObject, puis crée un gestionnaire d'événements pour l'événement Selected. Pour tester le gestionnaire d'événements, assurez-vous que ListObject n'est pas sélectionné, puis sélectionnez-le.

Cette version est destinée à une personnalisation au niveau du document.

    WithEvents SelectedList As Microsoft.Office.Tools.Excel.ListObject
    Private Sub ListObject_Selected()
        SelectedList = Me.Controls.AddListObject( _
            Me.Range("A1", "C4"), "List1")
    End Sub

    Sub List1_Selected(ByVal Target As _
        Microsoft.Office.Interop.Excel.Range) Handles SelectedList.Selected
        MessageBox.Show("The list object has been selected.")
    End Sub

private void ListObject_Selected()
{
    Microsoft.Office.Tools.Excel.ListObject list1 =
        this.Controls.AddListObject(
        this.Range["A1", "C4"], "list1");

    list1.Selected += new Microsoft.Office.Interop.Excel.
        DocEvents_SelectionChangeEventHandler(list1_Selected);
}

void list1_Selected(Microsoft.Office.Interop.Excel.Range Target)
{
    MessageBox.Show("The list object has been selected.");
}

Cette version est destinée à un complément d'application.

WithEvents SelectedList As ListObject
Private Sub ListObject_Selected()
    Dim NativeWorksheet As Microsoft.Office.Interop.Excel.Worksheet =
        Me.Application.Worksheets(1)
    Dim vstoWorksheet As Microsoft.Office.Tools.Excel.Worksheet =
            Globals.Factory.GetVstoObject(NativeWorksheet)
    SelectedList = vstoWorksheet.Controls.AddListObject( _
        vstoWorksheet.Range("A1", "C4"), "List1")
End Sub

Sub List1_Selected(ByVal Target As  _
    Microsoft.Office.Interop.Excel.Range) Handles SelectedList.Selected
    System.Windows.Forms.MessageBox.Show("The list object has been selected.")
End Sub
private void ListObject_Selected()
{
    Worksheet vstoWorksheet =
        Globals.Factory.GetVstoObject(this.Application.ActiveWorkbook.Worksheets[1]);
    ListObject list1 =
        vstoWorksheet.Controls.AddListObject(
        vstoWorksheet.Range["A1", "C4"], "list1");

    list1.Selected += new 
        Excel.DocEvents_SelectionChangeEventHandler(list1_Selected);
}

void list1_Selected(Excel.Range Target)
{
    System.Windows.Forms.MessageBox.Show("The list object has been selected.");
}

Sécurité .NET Framework

Voir aussi

Référence

ListObject Interface

Microsoft.Office.Tools.Excel, espace de noms