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.
Ocorre quando uma camada é alterada no documento aberto no Visualizador do Microsoft Visio.
Sintaxe
mais simples. OnLayerChanged (LayerIndex, Visible, ColorOverride, Color, ColorTrans)
expressão Uma expressão que retorna um objeto Viewer .
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| LayerIndex | Obrigatório | Long | O índice da camada alterada. |
| Visible | Obrigatório | Boolean | Indica se a camada alterada é visível na interface do usuário. |
| ColorOverride | Obrigatório | Boolean | Indica se a cor das formas na camada alterada deve ser substituída. |
| Color | Obrigatório | OLE_COLOR | A cor da camada alterada, expressa em valores RGB. |
| ColorTrans | Obrigatório | Double | A porcentagem de transparência da camada alterada. |
Comentários
Você pode alterar uma camada na caixa de diálogo Propriedades da Camada ou programaticamente usando as propriedades LayerColor, LayerColorOverride, LayerColorTrans e LayerVisible .
Exemplo
O código a seguir mostra como usar o evento OnLayerChanged para exibir a nova porcentagem de transparência da camada alterada na janela Immediate.
Private Sub vsoViewer_OnLayerChanged(ByVal LayerIndex As Long, ByVal Visible As Boolean, ByVal ColorOverride As Boolean, ByVal Color As stdole.OLE_COLOR, ByVal ColorTrans As Double)
Debug.Print "The new transparency percentage is"; ColorTrans
End Sub
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.