Метод Application.OpenUndoTransaction (Project)

Создайте набор транзакций отмены для ряда операций.

Синтаксис

выражение. OpenUndoTransaction( _Label_, _guid_ )

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

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Label	Обязательный	String	Имя, отображающееся в раскрывающемся списке для команды Отмена транзакции .
guid	Необязательный	Variant	ИДЕНТИФИКАТОР GUID, который однозначно идентифицирует метку.

Замечания

Метод OpenUndoTransaction используется в сочетании с методом CloseUndoTransaction . Используйте OpenUndoTransaction и CloseUndoTransaction в одной команде или группе команд.

Нельзя вложить одну транзакцию отмены в другую.

Пример

В следующем примере показано использование метода OpenUndoTransaction для создания набора транзакций отмены. После запуска макроса задача с именем Задача вне транзакции отображается как элемент Вставка задачи в раскрывающемся списке Отменить на панели быстрого доступа. Шесть задач с именем UndoMe 1 – UndoMe 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 и обратная связь.