Objeto Availabilities (Project)
Contém uma coleção de objetos Availability.
Exemplo
Usando a coleção Availabilities
Uso Availabilities ( Index ), onde Index é o número de índice de disponibilidade, para retornar um único objeto de disponibilidade. O exemplo a seguir retorna as informações de disponibilidade da primeira linha de grade Disponibilidade do recurso para o recurso especificado.
MsgBox ActiveProject.Resources("Tom").Name & " is available from " & _
ActiveProject.Resources("Tom").Availabilities(1).AvailableFrom & " to " & _
ActiveProject.Resources("Tom").Availabilities(1).AvailableTo & "."
Usando a coleção Availabilities
Use a propriedade Availabilities para retornar uma coleção de Availabilities. O exemplo a seguir exibe o intervalo de datas em que o recurso especificado está disponível para trabalho.
Dim Avail As Availability
For Each Avail In ActiveProject.Resources("Tom").Availabilities
MsgBox "From " & Avail.AvailableFrom & " to " & Avail.AvailableTo
Next Avail
Use o método Add para adicionar um objeto Availability à coleção Availabilities. O exemplo a seguir adiciona uma linha à grade Disponibilidade do Recurso que mostra que o recurso especificado estará disponível somente por meio período no mês de abril.
ActiveProject.Resources("Tom").Availabilities.Add "4/1/2012", "4/30/2012", 50
Métodos
| Nome |
|---|
| Add |
Propriedades
| Nome |
|---|
| Aplicativo |
| Count |
| Item |
| Parent |
Confira também
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.