ApplicationFactory.HasVstoObject – metoda (_Worksheet)

Článek
05/14/2013

Vrátí hodnotu, která označuje, zda Microsoft.Office.Tools.Excel.Worksheet hostitele zboží existuje pro zadaný objekt listu aplikace Excel.

Obor názvů: Microsoft.Office.Tools.Excel
Sestavení: Microsoft.Office.Tools.Excel (v Microsoft.Office.Tools.Excel.dll)
Microsoft.Office.Tools.Excel.v4.0.Utilities (v Microsoft.Office.Tools.Excel.v4.0.Utilities.dll)

Syntaxe

'Deklarace
Function HasVstoObject ( _
    worksheet As _Worksheet _
) As Boolean

bool HasVstoObject(
    _Worksheet worksheet
)

Parametry

worksheet
Typ: Microsoft.Office.Interop.Excel._Worksheet
Nativní listu objektu, který chcete testovat.Ačkoli je tento parametr je typu Microsoft.Office.Interop.Excel._Worksheet, obvykle předáte Microsoft.Office.Interop.Excel.Worksheet objekt do této metody.

Vrácená hodnota

Typ: System.Boolean
true Pokud Microsoft.Office.Tools.Excel.Worksheet hostitele zboží existuje pro zadaný Microsoft.Office.Interop.Excel.Worksheet objekt; v opačném případě se false.

Poznámky

Tuto metodu lze volat v doplněk na aplikační úrovni pro testování existence spravované ovládací prvky, které chcete zachovat před zavřením nebo uložíte list aplikace Excel.

[!POZNÁMKA]

worksheet Typ parametru je Microsoft.Office.Interop.Excel._Worksheet, což je nadřazený rozhraní Microsoft.Office.Interop.Excel.Worksheet.Proto tato metoda může přijímat objekty obou typů: Microsoft.Office.Interop.Excel._Worksheet a Microsoft.Office.Interop.Excel.Worksheet.Obvykle při odkazu na listu aplikace Excel, můžete použít Microsoft.Office.Interop.Excel.Worksheet.

Příklady

Následující příklad kódu zkontroluje, zda listy v aktuálním sešitu obsahují položky přidružené hostitele.Chcete-li použít tento kód, spusťte jej z ThisAddIn třídy v doplňku aplikace Excel projekt, který se zaměřuje .NET Framework 4 nebo .NET Framework 4.5.

Private Sub Application_WorkbookBeforeSave( _
    ByVal Wb As Microsoft.Office.Interop.Excel.Workbook, _
    ByVal SaveAsUI As Boolean, _
    ByRef Cancel As Boolean) Handles Application.WorkbookBeforeSave

    If Globals.Factory.HasVstoObject(Wb) = True Then
        For Each interopSheet As Excel.Worksheet In Wb.Worksheets
            If Globals.Factory.HasVstoObject(interopSheet) = True Then
                Dim vstoSheet As Worksheet = Globals.Factory.GetVstoObject(interopSheet)
                If vstoSheet.Controls.Count > 0 Then
                    System.Windows.Forms.MessageBox.Show( _
                        "The VSTO controls are not persisted when you" _
                        + " save and close this workbook.", _
                        "Controls Persistence", _
                        System.Windows.Forms.MessageBoxButtons.OK, _
                        System.Windows.Forms.MessageBoxIcon.Warning)
                    Exit For
                End If
            End If
        Next
    End If
End Sub

void Application_WorkbookBeforeSave(
    Microsoft.Office.Interop.Excel.Workbook Wb, bool SaveAsUI, 
    ref bool Cancel)
{            
    if (Globals.Factory.HasVstoObject(Wb) == true)
    {                
        foreach (Excel.Worksheet interopSheet in Wb.Worksheets)
        {
            if (Globals.Factory.HasVstoObject(interopSheet) ==  true)
            {
                Worksheet vstoSheet = Globals.Factory.GetVstoObject(interopSheet);
                if (vstoSheet.Controls.Count > 0)
                {
                    System.Windows.Forms.MessageBox.Show(
                        "The VSTO controls are not persisted when you"
                        + " save and close this workbook.",
                        "Controls Persistence",
                        System.Windows.Forms.MessageBoxButtons.OK,
                        System.Windows.Forms.MessageBoxIcon.Warning);
                    break;
                }
            }
        }
    }
}

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.

Viz také

Referenční dokumentace

ApplicationFactory Rozhraní

HasVstoObject – přetížení

Microsoft.Office.Tools.Excel – obor názvů

Sdílet prostřednictvím