Compartilhar via


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.