閱讀英文

共用方式為


(Project) 的 Months 物件

包含 Month 物件的集合。

註解

使用 Months (Index ) ,其中Index 是月份索引編號、月份名稱或 PjMonth 常數,可傳回單一 Month 物件。

範例

使用 Months 集合物件

下列範例會計算每個月的 2012年針對每個選定資源的工作天數目。

Dim R As Resource 
Dim D As Integer, M As Integer, WorkingDays As Integer 
 
For Each R In ActiveSelection.Resources() 
    WorkingDays = 0 

    With R.Calendar.Years(2012) 
        For M = 1 To .Months.Count 
            WorkingDays = 0 
            For D = 1 To .Months(M).Days.Count 
                If .Months(M).Days(D).Working = True Then 
                    WorkingDays = WorkingDays + 1 
                End If 
            Next D 

            MsgBox "There are " & WorkingDays & " working days in " & _
                .Months(M).Name & " for " & R.Name & "." 
        Next M 
    End With 
Next R

使用 Months 集合物件

使用 Months 屬性可傳回 Months 集合。 下列範例會計算 2012年中的月數。

ActiveProject.Calendar.Years(2012).Months.Count

屬性

另請參閱

Project 物件模型

支援和意見反應

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