ListObject.Selected, événement (System 2007)

Mise à jour : Juillet 2008

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

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

Syntaxe

Public Event Selected As DocEvents_SelectionChangeEventHandler

Dim instance As ListObject
Dim handler As DocEvents_SelectionChangeEventHandler

AddHandler instance.Selected, handler
public 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 vstoWorksheet As Worksheet = CType( _
        Me.Application.ActiveWorkbook.Worksheets(1),  _
        Excel.Worksheet).GetVstoObject()
    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 = ((Excel.Worksheet)
        this.Application.ActiveWorkbook.Worksheets[1]).GetVstoObject();
    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.");
}

Autorisations

Voir aussi

Référence

ListObject, classe

Membres ListObject

Microsoft.Office.Tools.Excel, espace de noms

Historique des modifications

Date

Historique

Raison

Juillet 2008

Ajout d'une version de l'exemple de code pour un complément d'application.

Modifications de fonctionnalités dans le SP1.