Edit

Share via


Months object (Project)

Contains a collection of Month objects.

Remarks

Use Months (Index ), whereIndex is the month index number, month name, or PjMonth constant, to return a single Month object.

Example

Using the Months Collection 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

Properties

See also

Project Object Model

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.