Freigeben über


NamedRange.Selected-Ereignis

Tritt auf, wenn das NamedRange-Steuerelement ausgewählt wird.

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

Syntax

'Declaration
Event Selected As DocEvents_SelectionChangeEventHandler
event DocEvents_SelectionChangeEventHandler Selected

Hinweise

Dieses Ereignis wird ausgelöst, wenn die Auswahl auf das NamedRange-Steuerelement geändert wird.

Beispiele

Das folgende Codebeispiel veranschaulicht einen Handler für das Selected-Ereignis, das die Adresse einer Zelle anzeigt, die im NamedRange ausgewählt ist.

Diese Version bezieht sich auf eine Anpassung auf Dokumentebene.

Private selectedEventRange As Microsoft.Office.Tools.Excel.NamedRange

Private Sub DisplaySelectedRange()
    selectedEventRange = Me.Controls.AddNamedRange( _
        Me.Range("B1", "E5"), "selectedEventRange")
    AddHandler Me.selectedEventRange.Selected, _
        AddressOf selectedEventRange_Selected
End Sub


Sub selectedEventRange_Selected(ByVal Target As _
    Microsoft.Office.Interop.Excel.Range)
    Dim selectedRange As String = Target.Address(, , _
        Excel.XlReferenceStyle.xlA1, , )

    MessageBox.Show(Me.Name & ": " & selectedRange & _
        " was selected.")
End Sub
Microsoft.Office.Tools.Excel.NamedRange selectedEventRange;
private void DisplaySelectedRange()
{
    selectedEventRange = this.Controls.AddNamedRange(
        this.Range["B1", "E5"], "selectedEventRange");
    this.selectedEventRange.Selected += new 
        Microsoft.Office.Interop.Excel.
        DocEvents_SelectionChangeEventHandler(
        selectedEventRange_Selected);
}

void selectedEventRange_Selected(
    Microsoft.Office.Interop.Excel.Range Target)
{
    string selectedRange = Target.get_Address(
        Excel.XlReferenceStyle.xlA1);

    MessageBox.Show(this.Name + ": " + selectedRange + 
        " was selected.");
}

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

.NET Framework-Sicherheit

Siehe auch

Referenz

NamedRange Schnittstelle

Microsoft.Office.Tools.Excel-Namespace