Share via


Day-Objekt (Project)

Stellt einen Tag im Monat an. Das Day -Objekt ist ein Mitglied der Days -Auflistung.

Beispiel

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

Methoden

Name
Default

Eigenschaften

Name
Application
Kalender
Count
Index
Name
Parent
Shift1
Shift2
Shift3
Shift4
Shift5
Arbeiten

Support und Feedback

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.