Project () 的 Application.OptionsCalendar 方法

設定使用中專案的行事曆選項。

語法

expression。 OptionsCalendar( _StartWeekOnMonday_, _StartYearIn_, _StartTime_, _FinishTime_, _HoursPerDay_, _HoursPerWeek_, _SetDefaults_, _StartWeekOn_, _UseFYStartYear_, _DaysPerMonth_ )

expression 代表 Application 物件的變數。

參數

名稱	必要/選用	資料類型	描述
StartWeekOnMonday	選用	Boolean	True 是表示 如果行事曆週開始在星期一。 False 表示行事曆週星期日開始計算。 如果指定 StartWeekOn ，則會忽略 StartWeekOnMonday 。 ( StartWeekOn引數是更好的方法來指定一週開始)。
StartYearIn	選用	Long	會計年度的第一個月。 這可以是 PjMonth 常數之一。
StartTime	選用	Variant	工作日的預設開始時間。
FinishTime	選用	Variant	工作日的預設完成時間。
HoursPerDay	選用	Double	每天的預設工作時數。
HoursPerWeek	選用	Double	每週的預設工作時數。
SetDefaults	選用	布林值	如果StartYearIn、 StartTime、 FinishTime、 HoursPerDay、 HoursPerWeek、 StartWeekOn和 UseFYStartYear 的值做為新專案的預設值，則為 True。 預設值為 False。
StartWeekOn	選用	Long	一星期的第一天。 這可以是 PjWeekday 常數之一。
UseFYStartYear	選用	Boolean	True 是表示 如果會計年度會由該會計年度的第一個月中的年份。 如果 由會計年度的最後一個月決定，則為 False。例如，如果 StartYearIn 是 pjJuly (代表 2012 年 7 月) ，而 UseFYStartYear 為 True，則 2012 年 6 月結束的會計年度會是 FY2012。
DaysPerMonth	選用	Double	預設的每個月的工作日數。

傳回值

布林值

註解

如果省略了某個引數，則其預設值會根據 [專案選項] 對話方塊中， [排程] 索引標籤上的設定來指定。

使用 OptionsCalendar 方法但未指定任何引數選取 [ 一般] 索引標籤顯示 [ 專案選項] 對話方塊。

範例

下列範例會將會計年度的第一個月設定為 4 月，而將每天的預設工作時數設定為 4 個小時，並將每週的預設工作時數設定為 20 個小時。

Sub Options_Calendar() 
    Dim HoursDay As Double 
    Dim HoursWeek As Double 
 
    HoursDay = 4 
    HoursWeek = 20 
 
    OptionsCalendar StartYearIn:=pjApril, HoursPerDay:=HoursDay, HoursPerWeek:=HoursWeek 
End Sub

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。