Propriedade ApplicationSettings.UndoLevels (Visio)
Determina o número de ações consecutivas que o usuário pode desfazer no Microsoft Visio. Leitura/gravação.
Sintaxe
expressão. UndoLevels
Expressão Uma variável que representa um objeto ApplicationSettings .
Valor de retorno
Long
Comentários
Definir a propriedade UndoLevels é equivalente a definir a opção Desfazer níveis na guia Geral na caixa de diálogo Opções do Visio (clique na guia Arquivo e clique em Opções).
O valor mínimo possível para UndoLevels é 0 (zero); o máximo é 99. O valor padrão é 20.
Quanto maior o valor de UndoLevels, mais memória será necessária para armazenar as ações.
Exemplo
Essa macro do Microsoft Visual Basic for Applications (VBA) mostra como usar a propriedade UndoLevels para imprimir o número atual de níveis desfeitos na janela Immediate. Ele também mostra como obter um objeto ApplicationSettings do objeto Aplicativo Visio.
Public Sub UndoLevels_Example()
Dim vsoApplicationSettings As Visio.ApplicationSettings
Dim lngUndoLevels As Long
Set vsoApplicationSettings = Visio.Application.Settings
lngUndoLevels = vsoApplicationSettings.UndoLevels
Debug.Print lngUndoLevels
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.