Método Application.DateAdd (Project)
Retorna a data e a hora que seguem outra data por um período especificado, para uma tarefa agendada automaticamente.
Sintaxe
expression. DateAdd( _StartDate_, _Duration_, _Calendar_ )
expressão Uma variável que representa um Aplicativo objeto.
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| StartDate | Obrigatório | Variant | A data original à qual a duração é adicionada. |
| Duration | Obrigatório | Variant | A duração a ser adicionada à data de início. |
| Calendar | Opcional | Object | Um recurso, tarefa ou objeto de calendário base. O valor padrão é o calendário do projeto ativo. |
Valor de retorno
Variant
Comentários
Para adicionar uma duração a uma data para uma tarefa agendada manualmente, que usa um calendário efetivo que pode incluir tempo de trabalho, use a propriedade EffectiveDateAdd .
Exemplo
O exemplo a seguir mostra a data de término de uma tarefa de três dias, agendada automaticamente, que começa no dia 11/07/07 às 8:00 horas.
Sub FindFinishDate()
MsgBox Application.DateAdd(StartDate:="7/11/07 8:00 AM", Duration:="3d")
End Sub
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.