Day-Objekt (Project)
Stellt einen Tag im Monat an. Das Day -Objekt ist ein Mitglied der Days -Auflistung.
Verwenden des Day-Objekts
Verwenden Sie Days (Index ), wobeiIndex die Tagesindexnummer oder PjWeekday-Konstante ist, um ein einzelnes Day-Objekt zurückzugeben. Im folgenden Beispiel wird ermittelt die Anzahl von Arbeitstagen im Monat September 2008 für jede ausgewählte Ressource.
Dim R As Resource, D As Integer, WorkingDays As Integer
For Each R In ActiveSelection.Resources()
WorkingDays = 0
With R.Calendar.Years(2008).Months(pjSeptember)
For D = 1 To .Days.Count
If .Days(D).Working = True Then
WorkingDays = WorkingDays + 1
End If
Next D
End With
MsgBox "There are " & WorkingDays & " working days in " _
& R.Name & "'s calendar."
Next R
Verwenden der Days-Auflistung
Verwenden Sie die Days -Eigenschaft, um eine Days -Auflistung zurückzugeben. Im folgenden Beispiel wird die Anzahl von Arbeitstagen im Monat September 2008 ermittelt.
ActiveProject.Calendar.Years(2008).Months(pjSeptember).Days.Count
Name |
---|
Default |
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.