Поделиться через


ApplicationFactory.HasVstoObject - метод (ListObject)

Возвращает значение, указывающее существует ли ведущий элемент Microsoft.Office.Tools.Excel.ListObject для заданного собственного объекта списка.

Пространство имен:  Microsoft.Office.Tools.Excel
Сборка:  Microsoft.Office.Tools.Excel (в Microsoft.Office.Tools.Excel.dll)

Синтаксис

'Декларация
Function HasVstoObject ( _
    listObject As ListObject _
) As Boolean
bool HasVstoObject(
    ListObject listObject
)

Параметры

Возвращаемое значение

Тип: System.Boolean
Значение true, если для заданного объекта Microsoft.Office.Interop.Excel.ListObject существует Microsoft.Office.Tools.Excel.ListObject; в противном случае — значение false.

Примеры

В следующем примере кода проверяется каждый объект собственного списка на листе, чтобы определить, связан ли с объектом списка ведущий элемент. Чтобы воспользоваться этим кодом, запустите его из класса ThisAddIn в проекте надстройки Excel, ориентированном на .NET Framework 4.

Dim mySheet As Excel.Worksheet = Me.Application.ActiveSheet
If mySheet.ListObjects.Count > 0 Then
    For Each list As Excel.ListObject In mySheet.ListObjects
        If Globals.Factory.HasVstoObject(list) = True Then
            System.Windows.Forms.MessageBox.Show( _
                "The VSTO properties of list objects are not " _
                + "persisted when you save and close this workbook.", _
                "VSTO ListObject", _
                System.Windows.Forms.MessageBoxButtons.OK, _
                System.Windows.Forms.MessageBoxIcon.Warning)
            Exit For
        End If
    Next
End If
Excel.Worksheet mySheet = (Excel.Worksheet)
    this.Application.Worksheets["Sheet1"];
if (mySheet.ListObjects.Count > 0)
{
    foreach (Excel.ListObject list in mySheet.ListObjects)
    {
        if (Globals.Factory.HasVstoObject(list) == true)
        {
            System.Windows.Forms.MessageBox.Show(
                "The VSTO properties of list objects are not "
                + "persisted when you save and close this workbook.",
                "VSTO ListObject",
                System.Windows.Forms.MessageBoxButtons.OK,
                System.Windows.Forms.MessageBoxIcon.Warning);
            break;
        }
    }
}

Безопасность платформы .NET Framework

См. также

Ссылки

ApplicationFactory Интерфейс

HasVstoObject - перегрузка

Microsoft.Office.Tools.Excel - пространство имен