Метод Application.MakeLocalCalendarEnterprise (Project)

Статья
04/07/2023

Преобразует локальный календарь в корпоративный.

Синтаксис

выражение. MakeLocalCalendarEnterprise( _OldName_, _NewName_ )

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

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
OldName	Необязательный	String	Имя локального календаря.
Newname	Необязательный	String	Имя календаря Enterprise.

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

Boolean

Примечания

Параметр NewName не используется. Например, если локальный календарь называется TestCal и вы выполняете код MakeLocalCalendarEnterprise OldName:="TestCal", NewName:="New TestCal" , результатом будет корпоративный календарь с именем TestCal.

Чтобы создать локальный календарь при входе Project профессиональный в Project Server, необходимо установить флажок Разрешить проектам использовать локальные базовые календари на странице Дополнительные параметры сервера в Project Web Access. Перезапустите Project профессиональный после изменения параметра в Project Web Access.

Пример

В следующем примере создается локальный календарь с именем TestCal, а затем он сохраняется как корпоративный календарь с тем же именем. Если Project профессиональный не зарегистрирован в Project Server, makeLocalCalendarEnterprise приводит к ошибке 1100 во время выполнения.

Sub TestCalendar() 
 BaseCalendarCreate Name:="TestCal" 
 MakeLocalCalendarEnterprise OldName:="TestCal" 
End Sub

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

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