NamedRange.Deselected – událost
Dojde k přesunu výběru z NamedRange do oblasti mimo ovládací prvek NamedRange řízení.
Obor názvů: Microsoft.Office.Tools.Excel
Sestavení: Microsoft.Office.Tools.Excel (v Microsoft.Office.Tools.Excel.dll)
Syntaxe
'Deklarace
Event Deselected As DocEvents_SelectionChangeEventHandler
event DocEvents_SelectionChangeEventHandler Deselected
Poznámky
Tato událost je aktivována pouze pokud NamedRange ovládací prvek má fokus a poté je mimo přenese fokus NamedRange řízení.
Příklady
Následující příklad kódu ukazuje obslužnou rutinu pro Deselected událost zobrazuje adresu buňky převáděný do výběr .
Tato verze je přizpůsobení úrovni dokumentu.
Private deselectedRange As Microsoft.Office.Tools.Excel.NamedRange
Private Sub DeselectRange()
deselectedRange = Me.Controls.AddNamedRange( _
Me.Range("B1", "D4"), "deselectedRange")
deselectedRange.Select()
AddHandler Me.deselectedRange.Deselected, _
AddressOf deselectedRange_Deselected
End Sub
Sub deselectedRange_Deselected(ByVal Target As Excel.Range)
Dim targetRange As String = Target.Address(, , _
Excel.XlReferenceStyle.xlA1, , )
MessageBox.Show("The NamedRange control was deselected." & _
" Selection transferred to " & Me.Name & ":" & _
targetRange & ".")
End Sub
Microsoft.Office.Tools.Excel.NamedRange deselectedRange;
private void DeselectRange()
{
deselectedRange = this.Controls.AddNamedRange(
this.Range["B1", "D4"], "deselectedRange");
deselectedRange.Select();
this.deselectedRange.Deselected += new
Microsoft.Office.Interop.Excel.
DocEvents_SelectionChangeEventHandler(
deselectedRange_Deselected);
}
void deselectedRange_Deselected(Excel.Range Target)
{
string targetRange = Target.get_Address(missing, missing,
Excel.XlReferenceStyle.xlA1, missing, missing);
MessageBox.Show("The NamedRange control was deselected." +
" Selection transferred to " + this.Name + ":" +
targetRange + ".");
}
Tato verze je aplikace- doplněkúroveň.
Private deselectedRange As NamedRange
Private Sub DeselectRange()
Dim NativeWorksheet As Microsoft.Office.Interop.Excel.Worksheet =
Globals.ThisAddIn.Application.ActiveSheet
Dim vstoWorksheet As Microsoft.Office.Tools.Excel.Worksheet =
Globals.Factory.GetVstoObject(NativeWorksheet)
deselectedRange = vstoWorksheet.Controls.AddNamedRange( _
vstoWorksheet.Range("B1", "D4"), "deselectedRange")
deselectedRange.Select()
AddHandler Me.deselectedRange.Deselected, _
AddressOf deselectedRange_Deselected
End Sub
Sub deselectedRange_Deselected(ByVal Target As Excel.Range)
Dim targetRange As String = Target.Address(, , _
Excel.XlReferenceStyle.xlA1, , )
System.Windows.Forms.MessageBox.Show( _
"The NamedRange control was deselected." & _
" Selection transferred to " & _
Me.Application.ActiveWorkbook.Worksheets(1).Name & ":" & _
targetRange & ".")
End Sub
NamedRange deselectedRange;
private void DeselectRange()
{
Worksheet vstoWorksheet =
Globals.Factory.GetVstoObject(this.Application.ActiveWorkbook.Worksheets[1]);
deselectedRange = vstoWorksheet.Controls.AddNamedRange(
vstoWorksheet.Range["B1", "D4"], "deselectedRange");
deselectedRange.Select();
deselectedRange.Deselected += new
Excel.DocEvents_SelectionChangeEventHandler(
deselectedRange_Deselected);
}
void deselectedRange_Deselected(Excel.Range Target)
{
string targetRange = 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("The NamedRange control was deselected." +
" Selection transferred to " +
nativeWorksheet.Name + ":" +
targetRange + ".");
}
Zabezpečení rozhraní .NET Framework
- Plná důvěra přímému volajícímu. Částečně zabezpečený kód nemůže tento člen použít. Další informace naleznete v tématu Používání knihoven z částečně důvěryhodného kódu.