共用方式為


Project) (Application.OpenUndoTransaction 方法

建立一系列作業的復原交易集。

語法

expression. OpenUndoTransaction( _Label_, _guid_ )

expression 代表 Application 物件的變數。

參數

名稱 必要/選用 資料類型 描述
Label 必要 String Undo Transaction 命令的下拉式清單中顯示的名稱。
guid 選用 Variant 唯一識別 Label 的 GUID。

註解

OpenUndoTransaction 方法用於 CloseUndoTransaction 方法一起使用。 在單一命令或命令群組上使用 OpenUndoTransactionCloseUndoTransaction

您無法建立巢狀式的復原交易。

範例

下列範例會示範如何使用 OpenUndoTransaction 方法建立的復原交易集。 執行巨集之後,名為 交易外的工作的工作會顯示為 快速存取工具列上的 [ 復原] 下拉式清單中的項目 插入任務。 名為 UndoMe 1UndoMe 6到六個任務顯示為 建立 6 工作在 [ 復原] 清單中。

Sub CreateTasksWithUndoTransaction() 
    ActiveProject.Tasks.Add "Task outside transaction" 
    Application.OpenUndoTransaction "Create 6 tasks" 
    Dim i As Integer 
    For i = 1 To 6 
        ActiveProject.Tasks.Add "UndoMe " & i 
    Next 
    Application.CloseUndoTransaction  
End Sub

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應