Objeto Month (Project)

Representa um mês em um ano. O objeto Month é um membro da coleção meses.

Exemplo

Usando o objeto Month

Utilize Meses (Índice ), em queÍndice é o número do índice do mês, o nome do mês ou a constante PjMonth , para devolver um único objeto Mês . O exemplo a seguir conta o número de dias úteis em cada mês de 2012 para cada recurso selecionado.

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

Usando a coleção Months

Use a propriedade meses para retornar uma coleção de meses. O exemplo a seguir conta o número de meses no 2012.

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

Métodos

Nome
Default

Propriedades

Nome
Application
Calendário
Contagem
Days
Índice
Nome
Responsável
Shift1
Shift2
Shift3
Shift4
Shift5
Working

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.