ListObject.SelectionChange-Ereignis (2007 System)

Článek
08/23/2008

Aktualisiert: Juli 2008

Tritt auf, wenn die Auswahl innerhalb des ListObject-Steuerelements geändert wird.

Namespace: Microsoft.Office.Tools.Excel
Assembly: Microsoft.Office.Tools.Excel.v9.0 (in Microsoft.Office.Tools.Excel.v9.0.dll)

Syntax

'Declaration
Public Event SelectionChange As DocEvents_SelectionChangeEventHandler
'Usage
Dim instance As ListObject
Dim handler As DocEvents_SelectionChangeEventHandler

AddHandler instance.SelectionChange, handler

public event DocEvents_SelectionChangeEventHandler SelectionChange

Hinweise

Dieses Ereignis wird ausgelöst, wenn ein beliebiger ausgewählter Bereich innerhalb des ListObject geändert wird.

Dieses Ereignis wird nicht ausgelöst, wenn der Fokus von innerhalb eines ListObject-Steuerelements nach außerhalb des ListObject-Steuerelements verschoben wird. Es wird ausgelöst, wenn der Fokus von außerhalb eines ListObject-Steuerelements zum ListObject-Steuerelement verschoben wird.

Beispiele

Im folgenden Codebeispiel werden ein ListObject und anschließend ein Ereignishandler für das SelectionChange-Ereignis erstellt. Wählen Sie zum Testen des Ereignishandlers eine Zelle im ListObject aus, und wählen Sie anschließend eine andere Zelle im ListObject aus.

Diese Version bezieht sich auf eine Anpassung auf Dokumentebene.

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


Sub List1_SelectionChange(ByVal Target As _
    Microsoft.Office.Interop.Excel.Range) _
    Handles SelectionChangeList.SelectionChange
    MessageBox.Show("The selection in the list object has changed.")
End Sub

private void ListObject_SelectionChange()
{
    Microsoft.Office.Tools.Excel.ListObject list1 =
        this.Controls.AddListObject(
        this.Range["A1", "C4"], "list1");
    list1.SelectionChange += new Microsoft.Office.Interop.
        Excel.DocEvents_SelectionChangeEventHandler(
        list1_SelectionChange);
}

void list1_SelectionChange(Microsoft.Office.Interop.Excel.Range Target)
{
    MessageBox.Show("The selection in the list object has changed.");
}

Diese Version bezieht sich auf ein Add-In auf Anwendungsebene.

WithEvents SelectionChangeList As ListObject
Private Sub ListObject_SelectionChange()
    Dim vstoWorksheet As Worksheet = CType( _
        Me.Application.ActiveWorkbook.Worksheets(1),  _
        Excel.Worksheet).GetVstoObject()
    SelectionChangeList = vstoWorksheet.Controls.AddListObject( _
        vstoWorksheet.Range("A1", "C4"), "SelectionChangeList")
End Sub


Sub List1_SelectionChange(ByVal Target As  _
    Microsoft.Office.Interop.Excel.Range) _
    Handles SelectionChangeList.SelectionChange
    System.Windows.Forms.MessageBox.Show( _
        "The selection in the list object has changed.")
End Sub

private void ListObject_SelectionChange()
{
    Worksheet vstoWorksheet = ((Excel.Worksheet)
        this.Application.ActiveWorkbook.Worksheets[1]).GetVstoObject();
    ListObject list1 =
        vstoWorksheet.Controls.AddListObject(
        vstoWorksheet.Range["A1", "C4"], "list1");
    list1.SelectionChange += new 
        Excel.DocEvents_SelectionChangeEventHandler(
        list1_SelectionChange);
}

void list1_SelectionChange(Excel.Range Target)
{
    System.Windows.Forms.MessageBox.Show("The selection in the list object has changed.");
}

Berechtigungen

Volle Vertrauenswürdigkeit für den unmittelbaren Aufrufer. Dieser Member kann von nur teilweise vertrauenswürdigem Code nicht verwendet werden. Weitere Informationen finden Sie unter Verwenden von Bibliotheken aus teilweise vertrauenswürdigem Code.