Función DateSerialDateSerial function

Devuelve una Variant (Date) de un año, mes y día específicos.Returns a Variant (Date) for a specified year, month, and day.

SintaxisSyntax

DateSerial(year, month, day )DateSerial(year, month, day)


La sintaxis de la función DateSerial tiene estos argumentos con nombre:The DateSerial function syntax has these named arguments:

PartPart DescripciónDescription
yearyear Obligatorio; Integer.Required; Integer. Número entre 100 y 9999, ambos inclusive o una expresión numérica.Number between 100 and 9999, inclusive, or a numeric expression.
monthmonth Obligatorio; Integer.Required; Integer. Cualquier expresión numérica.Any numeric expression.
dayday Obligatorio; Integer.Required; Integer. Cualquier expresión numérica.Any numeric expression.

ObservacionesRemarks

Para especificar una fecha, como el 31 de diciembre de 1991, el intervalo de números para cada argumento DateSerial debe estar en el intervalo aceptado para la unidad; es decir, 1–31 para los días y 1–12 para los meses.To specify a date, such as December 31, 1991, the range of numbers for each DateSerial argument should be in the accepted range for the unit; that is, 1–31 for days and 1–12 for months. Sin embargo, también puede especificar fechas relativas para cada argumento mediante cualquier expresión numérica que represente un número de días, meses o años antes o después de una fecha determinada.However, you can also specify relative dates for each argument by using any numeric expression that represents some number of days, months, or years before or after a certain date.

El ejemplo siguiente usa expresiones numéricas en lugar de números de fecha absolutos.The following example uses numeric expressions instead of absolute date numbers. En este caso la función DateSerial devuelve una fecha que es el día antes del primer día (1 - 1), dos meses antes de agosto (8 - 2), 10 años antes de 1990 (1990 - 10); es decir, el 31 de mayo de 1980.Here the DateSerial function returns a date that is the day before the first day (1 - 1), two months before August (8 - 2), 10 years before 1990 (1990 - 10); in other words, May 31, 1980.

En Windows 98 o Windows 2000, los años de dos para el argumento year se interpretan según la configuración del equipo definida por el usuario.Under Windows 98 or Windows 2000, two digit years for the year argument are interpreted based on user-defined machine settings. La configuración predeterminada es que los valores comprendidos entre 0 y 29, ambos inclusive, se interpretan como los años 2000–2029.The default settings are that values between 0 and 29, inclusive, are interpreted as the years 2000–2029. Los valores predeterminados entre 30 y 99 se interpretan como los años 1930–1999.The default values between 30 and 99 are interpreted as the years 1930–1999. Para todos los demás argumentos de año, utilice el año completo de cuatro dígitos (por ejemplo, 1800).For all other year arguments, use a four-digit year (for example, 1800).

Las versiones anteriores de Windows interpretan los años de dos dígitos en función de los valores predeterminados descritos anteriormente.Earlier versions of Windows interpret two-digit years based on the defaults described earlier. Para garantizar que la función devuelva el valor adecuado, utilice un año de cuatro dígitos.To be sure the function returns the proper value, use a four-digit year.

Cuando alguno de los argumentos supera el rango aceptado para dicho argumento, se incrementa hasta la siguiente unidad de mayor valor que corresponda.When any argument exceeds the accepted range for that argument, it increments to the next larger unit as appropriate. Por ejemplo, si especifica 35 días, esto se evaluará como un mes y un determinado número de días, en función de dónde se aplique en el año.For example, if you specify 35 days, it is evaluated as one month and some number of days, depending on where in the year it is applied. En caso de que un argumento simple esté fuera del rango -32.768 a 32.767, se producirá un error.If any single argument is outside the range -32,768 to 32,767, an error occurs. Si la fecha especificada por los tres argumentos está fuera del intervalo aceptable de fechas, se produce un error.If the date specified by the three arguments falls outside the acceptable range of dates, an error occurs.

Nota

Para el año, mes y día, si la configuración de la propiedad Calendar es gregoriana, se presupone que el valor especificado es del calendario gregoriano.For year, month, and day, if the Calendar property setting is Gregorian, the supplied value is assumed to be Gregorian. Si la configuración de la propiedad Calendar es Hijri, se presupone que el valor proporcionado es Hijri.If the Calendar property setting is Hijri, the supplied value is assumed to be Hijri.

La parte de la fecha devuelta se muestra en unidades de periodo de tiempo del calendario de Visual Basic actual.The returned date part is in the time period units of the current Visual Basic calendar. Por ejemplo, si el calendario actual es Hijri y la parte de fecha que se tiene que devolver es el año, el valor del año es un año Hijri.For example, if the current calendar is Hijri and the date part to be returned is the year, the year value is a Hijri year. Para el argumento año, los valores comprendidos entre 0 y 99, ambos inclusive, se interpretan como los años 1400–1499.For the argument year, values between 0 and 99, inclusive, are interpreted as the years 1400–1499. Para todos los demás valores de año, utilice el año completo de cuatro dígitos (por ejemplo, 1520).For all other year values, use the complete four-digit year (for example, 1520).

EjemploExample

Este ejemplo usa la función DateSerial para devolver la fecha del día, mes y año especificados.This example uses the DateSerial function to return the date for the specified year, month, and day.

Dim MyDate
' MyDate contains the date for February 12, 1969.
MyDate = DateSerial(1969, 2, 12)    ' Return a date.

Vea tambiénSee also

Soporte técnico y comentariosSupport and feedback

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación?Have questions or feedback about Office VBA or this documentation? 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.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.