Window.ReviewerMarkupVisible 属性 (Visio)

确定在特定审阅者或所有审阅者中，审阅者标记在显示绘图页的 Microsoft Visio 窗口中是否可见。 读/写。

语法

expression。 ReviewerMarkupVisible( _ReviewerID_ )

表达 一个代表 Window 对象的变量。

参数

名称	必需/可选	数据类型	说明
ReviewerID	可选	Long	特定审阅者的 ID。 如果未传递审阅者 ID， 则 ReviewerMarkupVisible 属性值指定所有审阅者的可见性。

返回值

布尔值

备注

使用 ReviewerMarkupVisible 属性在可以显示标记贴的窗口中为一个或所有审阅者获取和设置审阅者标记的当前状态（可见或不可见）。 设置 ReviewerMarkupVisible 属性对应于在用户界面中“审阅任务”窗格的“显示标记覆盖”部分中设置审阅者可见性状态。 例如，在不传递 ReviewerID 值的情况下将 ReviewerMarkupVisible 设置为 True 等效于单击“审阅”任务窗格中的“全部显示”。 传递特定审阅者的 ID 时将 ReviewerMarkupVisible 设置为 False 等效于清除任务窗格中该审阅者的框。

仅当父窗口显示 Visio 绘图页，而不是其他类型的 Visio 窗口（例如模具或 ShapeSheet 窗口）时， 才启用 ReviewerMarkupVisible 属性。

如果查看标记在用户界面中被禁用，则设置 ReviewerMarkupVisible 属性也被禁用。 如果您试图在查看标记被禁用时设置 ReviewerMarkupVisible，Visio 将显示一条错误消息。 若要能够设置 ReviewerMarkupVisible，必须通过单击“审阅”选项卡上的“显示标记”来启用查看标记。或者，可以通过更改文档 ShapeSheet 的“文档属性”部分中的 ViewMarkup 单元格的值来启用对现有标记覆盖的查看标记。 请使用以下代码：

ActiveDocument.DocumentSheet.CellsSRC(visSectionObject, visRowDoc, visDocViewMarkup).FormulaU = True

示例

此 Microsoft Visual Basic for Applications (VBA) 宏使用 ReviewerMarkupVisible 属性获取活动 Visio 绘图窗口中所有审阅者的审阅者标记的当前可见性状态。 然后，它将状态切换到相反的值。 此示例假定活动窗口包含标记覆盖。

Public Sub ReviewerMarkupVisible_Example() 
 
 ActiveWindow.Document.DocumentSheet.CellsSRC(visSectionObject, visRowDoc, visDocViewMarkup).FormulaU = True 
 
 Debug.Print ActiveWindow.ReviewerMarkupVisible 
 ActiveWindow.ReviewerMarkupVisible = Not ActiveWindow.ReviewerMarkupVisible 
 Debug.Print ActiveWindow.ReviewerMarkupVisible 
 
End Sub

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。