ListObject.SelectionChange - событие
Возникает при изменении выделения внутри элемента управления ListObject.
Пространство имен: Microsoft.Office.Tools.Excel
Сборка: Microsoft.Office.Tools.Excel (в Microsoft.Office.Tools.Excel.dll)
Синтаксис
'Декларация
Event SelectionChange As DocEvents_SelectionChangeEventHandler
event DocEvents_SelectionChangeEventHandler SelectionChange
Заметки
Это событие возникает, когда изменяется выделенный диапазон внутри ListObject.
Это событие не возникает, если фокус перемещается изнутри элемента управления ListObject в область вне элемента управления ListObject. Оно возникает, если фокус перемещается из области вне элемента управления ListObject в элемент управления ListObject.
Примеры
В следующем примере кода создается объект ListObject, а затем создается обработчик событий для события SelectionChange. Для проверки обработчика событий выделите ячейку в ListObject, затем выделите другую ячейку в ListObject.
Эта версия предназначена для настройки уровня документа.
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.");
}
Эта версия предназначена для надстройки уровня приложения.
WithEvents SelectionChangeList As ListObject
Private Sub ListObject_SelectionChange()
Dim NativeWorksheet As Microsoft.Office.Interop.Excel.Worksheet =
Me.Application.Worksheets(1)
Dim vstoWorksheet As Microsoft.Office.Tools.Excel.Worksheet =
Globals.Factory.GetVstoObject(NativeWorksheet)
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 =
Globals.Factory.GetVstoObject(this.Application.ActiveWorkbook.Worksheets[1]); ;
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.");
}
Безопасность платформы .NET Framework
- Полное доверие для непосредственно вызывающего метода. Этот член не может быть использован частично доверенным кодом. Дополнительные сведения см. в разделе Использование библиотек из не вполне надежного кода.