Método Application.DateAdd (Project)
Devuelve la fecha y hora que sigue a otra fecha por una duración especificada, para una tarea programada automáticamente.
Sintaxis
expresión. DateAdd( _StartDate_, _Duration_, _Calendar_ )
expresión Variable que representa un objeto Application.
Parámetros
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| StartDate | Obligatorio | Variant | Fecha original a la que se agrega la duración. |
| Duration | Obligatorio | Variant | Duración que desea agregar a la fecha de comienzo. |
| Calendar | Opcional | Object | Objeto de recurso, tarea o calendario base. El valor predeterminado es el calendario del proyecto activo. |
Valor devuelto
Variant
Comentarios
Para agregar una duración a una fecha para una tarea programada manualmente, que usa un calendario efectivo que puede incluir tiempo no laborable, use la propiedad EffectiveDateAdd .
Ejemplo:
En el siguiente ejemplo se muestra la fecha de finalización de una tarea de tres días programada automáticamente que comienza el 11/7/07 a las 8 a.m.
Sub FindFinishDate()
MsgBox Application.DateAdd(StartDate:="7/11/07 8:00 AM", Duration:="3d")
End Sub
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.