變更基準行事曆中的一天或幾天。
語法
expression。
BaseCalendarEditDays( _Name_, _StartDate_, _EndDate_, _WeekDay_, _Working_, _From1_, _To1_, _From2_, _To2_, _From3_, _To3_, _Default_, _From4_, _To4_, _From5_, _To5_ )
expression 代表 Application 物件的變數。
參數
| 名稱 | 必要/選用 | 資料類型 | 描述 |
|---|---|---|---|
| Name | 必要 | String | 字串 。 若要變更之基準行事曆的名稱。 |
| StartDate | 選用 | Variant | 要變更的開始日期。 如果沒有 EndDate 指定 StartDate ，則到期是受影響的唯一一天。 如果指定 WeekDay ，則會忽略 StartDate 。 |
| EndDate | 選用 | Variant | 要變更的最後一個日期。 若沒有 StartDate 指定 EndDate ，則該日期是受影響的唯一天。 如果指定 WeekDay ，則會忽略 EndDate 。 |
| 平日 | 選用 | Long | 若要變更 weekday。 如果指定 StartDate 或 EndDate ，則會忽略 WeekDay 。 可以是 PjWeekday 常數之一。 |
| Working | 選用 | Boolean | True 是表示 如果是工作日。 |
| 來自1 | 選用 | Variant | 第一個輪班的開始時間。 |
| To1 | 選用 | Variant | 第一個輪班的結束時間。 |
| 來自2 | 選用 | Variant | 第二個輪班的開始時間。 |
| To2 | 選用 | Variant | 第二個輪班的結束時間。 |
| 來自3 | 選用 | Variant | 第三個輪班的開始時間。 |
| To3 | 選用 | Variant | 第三個輪班的結束時間。 |
| Default | 選用 | Boolean | 會重設為預設值指定 StartDate 和 EndDate ，或是 WeekDay 、 的日期。 如果 使用 指定，則 預設 會忽略。 |
| 來自4 | 選用 | Variant | 第四個輪班的開始時間。 |
| To4 | 選用 | Variant | 第四個輪班的結束時間。 |
| 來自5 | 選用 | Variant | 第五個輪班的開始時間。 |
| To5 | 選用 | Variant | 第五個輪班的結束時間。 |
傳回值
布林值
範例
下面範例在會標準行事曆中將星期三設為非工作日。
Sub MakeWednesdaysNonWorking()
BaseCalendarEditDays Name:="Standard", Weekday:=pjWednesday, Working:=False
End Sub
下面範例會在標準行事曆中將 2/10/97 到 2/12/97 的時間段全部設為非工作日。
Sub MakeSelectedDaysNonWorking()
BaseCalendarEditDays Name:="Standard", StartDate:="2/10/97", EndDate:="2/12/97", Working:=False
End Sub
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。