Month Object (Project)

Represents a month in a year. The Month object is a member of the Months collection.

Using the Month Object

Use Months ( Index ), where Index is the month index number, month name, or PjMonth constant, to return a single Month object. The following example counts the number of working days in each month of 2012 for each selected resource.

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

Using the Months Collection

Use the Months property to return a Months collection. The following example counts the number of months in 2012.

ActiveProject.Calendar.Years(2012).Months.Count
Show:
© 2014 Microsoft