Метод 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 и обратная связь.