Objet Month (Project)

Représente un mois d’une année. L’objet Month est membre de la collection Months.

Exemple

Utilisation de l'objet Month

Utilisez Months (Index ), oùIndex est le numéro d’index du mois, le nom du mois ou la constante PjMonth , pour renvoyer un seul objet Month . L’exemple suivant compte le nombre de jours ouvrés de chaque mois de 2012 pour chaque ressource sélectionnée.

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

Utilisation de la collection Months

Utilisez la propriété Months pour renvoyer une collection Months . L’exemple suivant compte le nombre de mois en 2012.

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

Méthodes

Nom
Default

Propriétés

Nom
Application
Calendar
Count
Jours
Index
Name
Parent
Shift1
Shift2
Shift3
Shift4
Shift5
Working

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.