ListObject.Deselected Событие (2007 System)
Обновлен: Июль 2008
Происходит при перемещении выделения из элемента управления ListObject на область за пределами элемента управления ListObject.
Пространство имен: Microsoft.Office.Tools.Excel
Сборка: Microsoft.Office.Tools.Excel.v9.0 (в Microsoft.Office.Tools.Excel.v9.0.dll)
Синтаксис
'Декларация
Public Event Deselected As DocEvents_SelectionChangeEventHandler
'Применение
Dim instance As ListObject
Dim handler As DocEvents_SelectionChangeEventHandler
AddHandler instance.Deselected, handler
public event DocEvents_SelectionChangeEventHandler Deselected
Заметки
Это событие возникает только в том случае, если фокус находится на элементе управления ListObject, а затем перемещается за пределы элемента управления ListObject.
Примеры
В следующем примере кода создается ListObject и обработчик событий Deselected. Когда выделяется объект ListObject, а затем выделяется объект вне ListObject, выводится сообщение, указывающее, что выделение изменено.
Эта версия предназначена для настройки уровня документа.
WithEvents DeselectedList As Microsoft.Office.Tools.Excel.ListObject
Private Sub ListObject_Deselected()
DeselectedList = Me.Controls.AddListObject( _
Me.Range("A1", "C4"), "DeselectedList")
End Sub
Sub List1_Deselected(ByVal Target As _
Microsoft.Office.Interop.Excel.Range) Handles DeselectedList.Deselected
MessageBox.Show("The list object is no longer selected.")
End Sub
private void ListObject_Deselected()
{
Microsoft.Office.Tools.Excel.ListObject list1 =
this.Controls.AddListObject(
this.Range["A1", "C4"], "list1");
list1.Deselected += new
Microsoft.Office.Interop.Excel.
DocEvents_SelectionChangeEventHandler(list1_Deselected);
}
void list1_Deselected(Microsoft.Office.Interop.Excel.Range Target)
{
MessageBox.Show("List1 is no longer selected.");
}
Эта версия предназначена для надстройки уровня приложения.
WithEvents DeselectedList As ListObject
Private Sub ListObject_Deselected()
Dim vstoWorksheet As Worksheet = CType( _
Me.Application.ActiveWorkbook.Worksheets(1), _
Excel.Worksheet).GetVstoObject()
DeselectedList = vstoWorksheet.Controls.AddListObject( _
vstoWorksheet.Range("A1", "C4"), "DeselectedList")
End Sub
Sub List1_Deselected(ByVal Target As _
Microsoft.Office.Interop.Excel.Range) Handles DeselectedList.Deselected
System.Windows.Forms.MessageBox.Show( _
"The list object is no longer selected.")
End Sub
private void ListObject_Deselected()
{
Worksheet vstoWorksheet = ((Excel.Worksheet)
this.Application.ActiveWorkbook.Worksheets[1]).GetVstoObject();
ListObject list1 =
vstoWorksheet.Controls.AddListObject(
vstoWorksheet.Range["A1", "C4"], "list1");
list1.Deselected += new
Excel.DocEvents_SelectionChangeEventHandler(list1_Deselected);
}
void list1_Deselected(Microsoft.Office.Interop.Excel.Range Target)
{
System.Windows.Forms.MessageBox.Show("List1 is no longer selected.");
}
Разрешения
- Полное доверие для непосредственно вызывающего метода. Этот член не может быть использован частично доверенным кодом. Дополнительные сведения см. в разделе Использование библиотек из не вполне надежного кода.
См. также
Ссылки
Microsoft.Office.Tools.Excel - пространство имен
Журнал изменений
Дата |
Журнал событий |
Причина |
---|---|---|
Июль 2008 |
Добавлена версия кода для надстройки уровня приложения. |
Изменение функции SP1. |