ApplicationFactory.HasVstoObject 方法 (ListObject)
傳回值,這個值表示指定的原生清單物件是否有 Microsoft.Office.Tools.Excel.ListObject 存在。
命名空間: Microsoft.Office.Tools.Excel
組件: Microsoft.Office.Tools.Excel (在 Microsoft.Office.Tools.Excel.dll 中)
Microsoft.Office.Tools.Excel.v4.0.Utilities (在 Microsoft.Office.Tools.Excel.v4.0.Utilities.dll 中)
語法
'宣告
Function HasVstoObject ( _
listObject As ListObject _
) As Boolean
bool HasVstoObject(
ListObject listObject
)
參數
- listObject
型別:Microsoft.Office.Interop.Excel.ListObject
要測試的原生 Excel 清單物件。
傳回值
型別:System.Boolean
如果指定的 Microsoft.Office.Interop.Excel.ListObject 物件有 Microsoft.Office.Tools.Excel.ListObject 存在,則為 true,否則為 false。
範例
下列程式碼範例會檢查工作表中每個原生的清單物件,以判定清單物件是否有關聯的主項目。 若要使用這個程式碼,請在以 .NET Framework 4 或 .NET Framework 4.5 為目標之 Excel 增益集專案的 ThisAddIn 類別中執行這個程式碼。
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 安全性
- 完全信任立即呼叫者。這個成員無法供部分信任的程式碼使用。如需詳細資訊,請參閱從部分受信任程式碼使用程式庫。