Publisher) (Application.IsValidObject 方法

判斷指定的物件變數是否參考有效的物件，並傳回 布林 值：如果參考物件的指定變數有效，則為 True ;如果變數參考的物件已刪除，則為 False 。

語法

運算式。IsValidObject (物件)

expression 代表 Application 物件的變數。

參數

名稱	必要/選用	資料類型	描述
Object	必要	Object	參照物件的變數。

傳回值

布林值

範例

本範例會為有效的物件設定線條格式。

Sub ValidShape(shpObject As Shape) 
 
 If Application.IsValidObject object:=shpObject) = True Then 
 With shpObject.Line 
 .DashStyle = msoLineRoundDot 
 .ForeColor.RGB = RGB(Red:=158, Green:=50, Blue:=208) 
 .Weight = 5 
 End With 
 End If 
 
End Sub

使用下列子常式來呼叫先前範例中的子常式。

Sub CallValidShape() 
 Call ValidShape(shpObject:=ActiveDocument.Pages(1).Shapes(2)) 
End Sub

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。