共用方式為

(Visio) 的 Application.Redo 方法

  • 發行項

回復最近的復原單位。

語法

運算式。重新

expression 代表 Application 物件的變數。

傳回值

無

註解

若要還原 Undo 方法所造成的影響，請使用 Redo 方法。 例如，如果您清除某個項目，然後使用 Undo 方法來還原它，則使用 Redo 方法會再次清除此項目。

您無法從在開啟的復原單位範圍內執行的程式碼叫用 Redo 方法。 如果程式碼是下列其中一項，則在開放式復原單位的範圍內：

  • 由 Microsoft Visio 使用者介面所叫用的巨集或附加元件。

  • 回應 VisioIsIdle 事件以外的 Visio 事件的事件處理常式中。

  • 在使用者建立的復原範圍中。 如果您從開啟的復原單位的範圍內的程式碼呼叫 Redo 方法，它將會觸發例外狀況。

如果 Visio 實例目前正在執行復原或取消復原，則 Redo 方法也會觸發例外狀況。 若要判斷 Visio 實例是否正在復原或取消復原，請使用 IsUndoingOrRedoing 屬性。

您可以從 VisioIsIdle 事件處理常式呼叫 Redo 方法，因為只有當 IsUndoingOrRedoing 屬性為 False 時，才可以觸發 VisioIsIdle 事件。 您也可以從不是由 Visio 實例所叫用的程式碼呼叫 Redo 方法，例如，從 [Visual Basic 編輯器] 或外部程式所叫用的程式碼呼叫此方法。

範例

這個 Microsoft Visual Basic for Applications (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 支援與意見反應。