Поделиться через

Метод Application.Redo (Visio)

  • Статья

Отменяет последнюю единицу отмены.

Синтаксис

expression. Повторить

выражение: переменная, представляющая объект Application.

Возвращаемое значение

Отсутствует

Примечания

Чтобы обратить вспять эффект метода Undo , используйте метод Redo . Например, если вы очистите элемент, а затем используете метод Undo для его восстановления, используйте метод Redo , чтобы очистить элемент снова.

Невозможно вызвать метод Redo из кода, выполняемого в области открытого блока отмены. Код находится в области открытого блока отмены, если он является одним из следующих:

  • Макрос или надстройка, вызываемые пользовательским интерфейсом Microsoft Visio.

  • В обработчике событий, реагирующего на событие Visio, отличное от события VisioIsIdle .

  • В области отмены, созданной пользователем. Если вызвать метод Redo из кода в области открытого блока отмены, возникнет исключение.

Метод Redo также вызывает исключение, если экземпляр Visio в настоящее время выполняет отмену или повтор. Чтобы определить, отменяется или повторно выполняется экземпляр Visio, используйте свойство IsUndoingOrRedoing .

Метод Redo можно вызвать из обработчика событий VisioIsIdle , так как событие VisioIsIdle может вызываться только в том случае, если свойство IsUndoingOrRedoing имеет значение False. Вы также можете вызвать метод Redo из кода, не вызываемого экземпляром Visio, например кода, вызываемого из редактора Visual Basic или из внешней программы.

Пример

Этот макрос Microsoft Visual Basic для приложений (VBA) показывает, как отменить и повторить действия.

 
Public Sub Redo_Example() 
 
 Dim vsoShape As Visio.Shape 
 
 'Draw a rectangle, use Undo to delete it, and 
 'then use Redo to redraw it. 
 Set vsoShape = ActivePage.DrawRectangle(1, 5, 5, 1) 
 
 'Delete the shape. 
 Visio.Application.Undo 
 
 'Bring it back. 
 Visio.Application.Redo 
 
End Sub

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.