Lire en anglais

Partager via


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

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.