NamedRange.Selected-Ereignis (2007 System)
Aktualisiert: Juli 2008
Tritt auf, wenn das NamedRange-Steuerelement ausgewählt 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 Selected As DocEvents_SelectionChangeEventHandler
'Usage
Dim instance As NamedRange
Dim handler As DocEvents_SelectionChangeEventHandler
AddHandler instance.Selected, handler
public 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(missing, missing,
Excel.XlReferenceStyle.xlA1, missing, missing);
MessageBox.Show(this.Name + ": " + selectedRange +
" was selected.");
}
Diese Version bezieht sich auf ein Add-In auf Anwendungsebene.
Private selectedEventRange As NamedRange
Private Sub DisplaySelectedRange()
Dim vstoWorksheet As Worksheet = CType( _
Me.Application.ActiveWorkbook.Worksheets(1), _
Excel.Worksheet).GetVstoObject()
selectedEventRange = vstoWorksheet.Controls.AddNamedRange( _
vstoWorksheet.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, , )
System.Windows.Forms.MessageBox.Show( _
Me.Application.ActiveWorkbook.Worksheets(1).Name & _
": " & selectedRange & " was selected.")
End Sub
NamedRange selectedEventRange;
private void DisplaySelectedRange()
{
Worksheet vstoWorksheet = ((Excel.Worksheet)
this.Application.ActiveWorkbook.Worksheets[1]).GetVstoObject();
selectedEventRange = vstoWorksheet.Controls.AddNamedRange(
vstoWorksheet.Range["B1", "E5"], "selectedEventRange");
selectedEventRange.Selected += new
Excel.DocEvents_SelectionChangeEventHandler(
selectedEventRange_Selected);
}
void selectedEventRange_Selected(
Microsoft.Office.Interop.Excel.Range Target)
{
string selectedRange = Target.get_Address(missing, missing,
Excel.XlReferenceStyle.xlA1, missing, missing);
Excel.Worksheet nativeWorksheet = (Excel.Worksheet)
this.Application.ActiveWorkbook.Worksheets[1];
System.Windows.Forms.MessageBox.Show(
nativeWorksheet.Name + ": " + selectedRange +
" was selected.");
}
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.
Siehe auch
Referenz
Microsoft.Office.Tools.Excel-Namespace
Änderungsprotokoll
Date |
Versionsgeschichte |
Grund |
---|---|---|
Juli 2008 |
Version des Codebeispiels für ein Add-In auf Anwendungsebene hinzugefügt. |
SP1-Featureänderung. |