閱讀英文

共用方式為


(Project) 的 Month 物件

代表一年一個月。 Month 物件是 Months 集合的成員。

範例

使用 Month 物件

使用 Months (Index ) ,其中Index 是月份索引編號、月份名稱或 PjMonth 常數,可傳回單一 Month 物件。 下列範例會計算每個月的 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

方法

名稱
Default

屬性

支援和意見反應

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