Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Obtém o nome do revisor especificado no desenho aberto no Visualizador do Microsoft Visio. Somente leitura.
Sintaxe
mais simples. ReviewerName (ReviewerIndex)
expressão Uma expressão que retorna um objeto Viewer .
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| ReviewerIndex | Obrigatório | Long | O índice do revisor na coleção de revisores. |
Valor de retorno
String
Comentários
A coleção de revisores é baseada em um, portanto, o índice do primeiro revisor na coleção é 1. Se não houver revisores no desenho ou se você passar o índice de um revisor inexistente, o Visualizador do Visio retornará um erro.
Exemplo
O código a seguir obtém os nomes de todos os revisores no desenho aberto no Visualizador do Visio.
Dim intCounter As Integer
For intCounter = 1 To Viewer1.ReviewerCount
Debug.Print Viewer1.ReviewerName(intCounter)
Next intCounter
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.