Compartir a través de

Objeto Month (Project)

  • Artículo

Representa un mes de un año. El objeto Month es un miembro de la colección de meses.

Ejemplo:

Uso del objeto Month

Use Months (Index ), dondeIndex es el número de índice del mes, el nombre del mes o la constante PjMonth , para devolver un único objeto Month . En el ejemplo siguiente se cuenta el número de días laborables de cada mes de 2012 para cada recurso seleccionado.

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

Uso del conjunto Months

Utilice la propiedad Months para devolver una colección Months. En el ejemplo siguiente se cuenta el número de meses de 2012.

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

Métodos

Nombre
Default

Propiedades

Nombre
Application
Calendario
Count
Días
Índice
Nombre
Parent
Shift1
Shift2
Shift3
Shift4
Shift5
Working

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.