Devuelve un tipo de dato Variant (Date) que contiene una fecha a la que se ha agregado un intervalo de tiempo especificado.
Sintaxis
DateAdd ( intervalo, número, fecha )
La sintaxis de la función DateAdd tiene los siguientes argumentos:
argumento | Descripción |
|---|---|
|
intervalo |
Obligatorio. Expresión de cadena que es el intervalo de tiempo que desea agregar. |
|
number |
Obligatorio. Expresión numérica que es el número de intervalos que desea agregar. Puede ser positivo (para obtener fechas en el futuro) o negativo (para obtener fechas en el pasado). |
|
fecha |
Obligatorio. Tipo Variant (Fecha) o literal que representa la fecha a la que se agrega el intervalo. |
Sugerencia: En Access 2010, el generador de expresiones tiene IntelliSense, para que pueda ver qué argumentos requiere la expresión.
Configuración
El intervaloargumento tiene la siguiente configuración:
Configuración | Descripción |
|---|---|
|
yyyy |
Año |
|
q |
Trimestre |
|
m |
Mes |
|
y |
Día del año |
|
d |
Día |
|
w |
Weekday |
|
ww |
Semana |
|
h |
Hora |
|
n |
Minuto |
|
s |
Segundo |
Observaciones
Puede usar la función DateAdd para sumar o restar un intervalo de tiempo especificado de una fecha. Por ejemplo, puede usar DateAdd para calcular una fecha 30 días a partir de hoy o una hora 45 minutos a partir de ahora.
Para agregar días a la fecha, puede usar el día del año ("y"), el día ("d") o el día de la semana ("w").
La función DateAdd no devolverá una fecha no válida. En el ejemplo siguiente se agrega un mes al 31 de enero:
DateAdd("m", 1, "31-Jan-95")
En este caso, DateAdd devuelve 28-feb-95, no 31-feb-95. Si fecha es 31-ene-96, devuelve 29-Feb-96 porque 1996 es un año bisiesto.
Si la fecha calculada precede al año 100 (es decir, restan más años de los que hay en fecha), se producirá un error.
Si número no es un valor Long, se redondea al número entero más cercano antes de ser evaluado.
Nota: El formato del valor devuelto de DateAdd está determinado por la configuración del Panel de control , no por el formato que se pasa en el argumento de fecha .
Nota: En el caso de Date, si el valor de la propiedad Calendar es gregoriano, la fecha proporcionada debe ser Gregoriana. Si el calendario es Hijri, la fecha proporcionada debe ser Hijri. Si los valores de mes son nombres, el nombre debe ser coherente con el valor actual de la propiedad Calendar . Para minimizar la posibilidad de que los nombres de los meses estén en conflicto con la configuración actual de la propiedad Calendar , escriba valores numéricos de meses (formato de fecha corta).
Ejemplos de consultas
Expresión | Resultados |
|---|---|
|
Seleccione DateAdd ("AAAA", 1, [DateofSale]) como expr1 FROM ProductSales; |
Devuelve los resultados agregando 1 año a los valores de fecha del campo "DateofSale". |
|
Seleccione DateAdd ("AAAA",-1, [DateofSale]) como expr1 FROM ProductSales; |
Devuelve los resultados restando 1 año a los valores de fecha del campo "DateofSale". |
|
Seleccione DateAdd ("d", 10, [DateofSale]) como NewDate de ProductSales. |
Devuelve los resultados en la columna "NewDate" agregando 10 días a los valores de fecha del campo "DateofSale". |
|
Seleccione DateAdd ("WW",-1, [DateofSale]) AS NewDate FROM ProductSales; |
Devuelve los resultados de la columna "NewDate" restando 1 semana (7 días) de los valores de fecha del campo "DateofSale". |
Ejemplo de VBA
Nota: En los siguientes ejemplos se muestra el uso de esta función en un módulo de Visual Basic para aplicaciones (VBA). Para obtener más información sobre cómo trabajar con VBA, seleccione Referencia del programador en la lista desplegable situada junto a Buscar y escriba uno o más términos en el cuadro de búsqueda.
En este ejemplo se toma una fecha como entrada y se usa la función DateAdd para mostrar una fecha correspondiente a un número determinado de meses en el futuro.
Dim FirstDate As Date ' Declare variables.
Dim IntervalType As String
Dim Number As Integer
Dim Msg
IntervalType = "m" ' "m" specifies months as interval.
FirstDate = InputBox("Enter a date")
Number = InputBox("Enter number of months to add")
Msg = "New date: " & _
DateAdd(IntervalType, Number, FirstDate)
MsgBox Msg
Nota: Esta página se ha traducido mediante un sistema automático y es posible que contenga imprecisiones o errores gramaticales. Nuestro objetivo es que este contenido le resulte útil. ¿Podría decirnos si la información le resultó útil? Aquí puede consultar el artículo en inglés.
