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

Статья
08/11/2011

Возвращает значение, указывающее существует ли ведущий элемент 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
)

Параметры

listObject
Тип: Microsoft.Office.Interop.Excel.ListObject
Собственный объект списка Excel для тестирования.

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

Тип: 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 - пространство имен

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