使用英语阅读

通过


Day 对象 (Project)

代表月份中的某一天。 Day 对象是 集合的一个成员。

示例

使用 Day 对象

使用 Days (Index ) (其中Index 是日索引号或 PjWeekday 常量)返回单个 Day 对象。 下面的示例对 2008 年 9 月为每个所选资源的月份中的工作日数进行计数。

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

使用 Days 集合

使用 Days 属性可以返回一个 Days 集合。 以下示例统计 2008 年 9 月的工作日数。

ActiveProject.Calendar.Years(2008).Months(pjSeptember).Days.Count

方法

名称
Default

属性

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。