取得或設定代表 Global.mpt 檔案的基準行事曆的 行事曆 集合。 讀取/寫入 行事曆 。
語法
expression。 GlobalBaseCalendars
expression 代表 Application 物件的變數。
註解
若要將行事曆新增至企業通用範本,先建立本機行事曆,然後再新增本機行事曆至企業通用範本使用 MakeLocalCalendarEnterprise 方法。
若要在企業專案中啟用建立本機基準行事曆的功能,請在 Project Web App 中,按一下 [其他伺服器設定] 頁面上的 [允許專案使用本機基準行事曆]。
範例
下列範例會建立本機基準行事曆,然後將行事曆匯入至企業通用範本。
注意事項
[!注意事項] GlobalBaseCalendars 屬性是本機 Global.mpt 檔案 (而非企業通用範本) 中的行事曆集合。
Sub CreateEGlobalCalendar()
Dim globalCalendar As Calendar
BaseCalendarCreate Name:="NewBaseCalendar"
MakeLocalCalendarEnterprise OldName:="NewBaseCalendar", NewName:="NewBaseCalendar"
Debug.Print "Number of calendars in Global.mpt: " & GlobalBaseCalendars.Count
For Each globalCalendar In GlobalBaseCalendars
Debug.Print globalCalendar.Name
Next globalCalendar
End Sub
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。