閱讀英文

共用方式為


Project) (Day 物件

代表一個月中的一天。 Day 物件是 集合的成員。

範例

使用 Day 物件

使用 Days (Index ) ,其中Index 是日索引編號或 PjWeekday 常數,可傳回單一 Day 物件。 下列範例會計算每個選定資源 2008 年 9 月中的工作天數目。

Dim R As Resource, D As Integer, WorkingDays As Integer 
 
For Each R In ActiveSelection.Resources() 
    WorkingDays = 0 
    With R.Calendar.Years(2008).Months(pjSeptember) 
        For D = 1 To .Days.Count 
            If .Days(D).Working = True Then 
                WorkingDays = WorkingDays + 1 
            End If 
        Next D 
    End With 
    MsgBox "There are " & WorkingDays & " working days in " _ 
        & R.Name & "'s calendar." 
Next R

使用 Days 集合

使用 Days 屬性,可以傳回 Days 集合。 下面範例統計 2008 年 9 月的工作天數。

ActiveProject.Calendar.Years(2008).Months(pjSeptember).Days.Count

方法

名稱
Default

屬性

支援和意見反應

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