Application.IsValidObject 方法 (Publisher)

确定指定的对象变量是否引用有效对象并返回一个布尔值：如果引用对象的指定变量有效，则为 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 支持和反馈，获取有关如何接收支持和提供反馈的指南。