Funciones FormatDateTime
Devuelve una expresión con formato de fecha u hora.
Sintaxis
FormatDateTime(Date[,NamedFormat])
Argumentos:
- Date: necesario. Expresión de fecha a la que se va a aplicar formato.
Nota:
- Si se proporciona una cadena como entrada, los delimitadores utilizados en la fecha u hora de entrada deben ser los mismos que los delimitadores de configuración regional específicos del sistema. Los caracteres especiales mostrados en esta imagen
no están soportados. - No se debe indicar el número de días como argumento de entrada, ya que no está soportado.
- La fecha, el mes y el año deben escribirse en formato completo. Por ejemplo, para 08/02/2024, los formatos abreviados como 8/2/24 no están soportados.
- Si se proporciona una cadena como entrada, los delimitadores utilizados en la fecha u hora de entrada deben ser los mismos que los delimitadores de configuración regional específicos del sistema. Los caracteres especiales mostrados en esta imagen
- NamedFormat: opcional. Valor numérico que indica el formato de fecha y hora utilizado. Si se omite, se utiliza vbGeneralDate. Consulte la sección Configuración para ver los valores.
Configuración: el argumento NamedFormat tiene los siguientes valores:
vbGeneralDate: para obtener la fecha en formato de fecha general, se transfiere el valor 0.
Muestra una fecha y/u hora. Si hay una parte de fecha, se muestra como una fecha corta. Si hay una parte de hora, se muestra como una hora larga. Si está presente, se muestran ambas partes.
Ejemplo 1:
Dim d, mytime d="12/19/2024" mytime = FormatDateTime(d,0) 'Output: 12/19/2024 12:00:00 AM d="12/19/2024 02:30 PM" mytime = FormatDateTime(d,0) 'Output: - 12/19/2024 02:30:00 PM d="14:30:10 12/19/2024" mytime = FormatDateTime(d,0) 'Output: - 12/19/2024 02:30:10 PM d="02:30 PM 12/19/2024" mytime = FormatDateTime(d,0) 'Output: - 12/19/2024 02:30:00 PM d="12/19/2024 2pm" mytime = FormatDateTime(d,0) Output: - 12/19/2024 02:00:00 PM d="2 pm" mytime = FormatDateTime(d,0) 'Output: - 12/30/1899 02:00:00 PM d="12-19-2024" mytime = FormatDateTime(d,0) 'Output: - ERROR as delimiter should be same as locale’s delimiter
vbLongDate: para obtener una fecha larga, se transfiere el valor 1.
Muestra una fecha con el formato de fecha larga especificado en la configuración regional del equipo.
Nota:
La fecha larga muestra el contenido solo con caracteres del inglés y el análisis de días hábiles no está soportado.Ejemplo 2:
Dim d, mytime d="12/19/2024" mytime = FormatDateTime(d,1) 'Output: 12/19/2024 12:00:00 AM d="12/19/2024 02:30 PM" mytime = FormatDateTime(d,1) 'Output: - 12/19/2024 02:30:00 PM d="14:30:10 12/19/2024" mytime = FormatDateTime(d,1) 'Output: - 12/19/2024 02:30:10 PM d="02:30 PM 12/19/2024" mytime = FormatDateTime(d,1) 'Output: - 12/19/2024 02:30:00 PM d="12/19/2024 2pm" mytime = FormatDateTime(d,1) Output: - 12/19/2024 02:00:00 PM d="2 pm" mytime = FormatDateTime(d,1) 'Output: - 12/30/1899 02:00:00 PM d="12-19-2024" mytime = FormatDateTime(d,1) 'Output: - ERROR as delimiter should be same as locale’s delimiter
vbShortDate: para obtener una fecha corta, se transfiere el valor 2.
Muestra una fecha con el formato de fecha corta especificado en la configuración regional del equipo.
Ejemplo 3:
Dim d, mytime d="12/19/2024" mytime = FormatDateTime(d,2) 'Output: 12/19/2024 12:00:00 AM d="12/19/2024 02:30 PM" mytime = FormatDateTime(d,2) 'Output: - 12/19/2024 02:30:00 PM d="14:30:10 12/19/2024" mytime = FormatDateTime(d,2) 'Output: - 12/19/2024 02:30:10 PM d="02:30 PM 12/19/2024" mytime = FormatDateTime(d,2) 'Output: - 12/19/2024 02:30:00 PM d="12/19/2024 2pm" mytime = FormatDateTime(d,2) Output: - 12/19/2024 02:00:00 PM d="2 pm" mytime = FormatDateTime(d,2) 'Output: - 12/30/1899 02:00:00 PM d="12-19-2024" mytime = FormatDateTime(d,2) 'Output: - ERROR as delimiter should be same as locale’s delimiter
vbLongTime: para obtener la hora en formato de hora larga, se transfiere el valor 3.
Muestra una hora con el formato de hora especificado en la configuración regional del equipo.
Nota:
La hora larga muestra el contenido solo con caracteres en inglés como AM o PM.Ejemplo 4:
Dim d, mytime d="12/19/2024" mytime = FormatDateTime(d,3) 'Output: 12/19/2024 12:00:00 AM d="12/19/2024 02:30 PM" mytime = FormatDateTime(d,3) 'Output: - 12/19/2024 02:30:00 PM d="14:30:10 12/19/2024" mytime = FormatDateTime(d,3) 'Output: - 12/19/2024 02:30:10 PM d="02:30 PM 12/19/2024" mytime = FormatDateTime(d,3) 'Output: - 12/19/2024 02:30:00 PM d="12/19/2024 2pm" mytime = FormatDateTime(d,3) Output: - 12/19/2024 02:00:00 PM d="2 pm" mytime = FormatDateTime(d,3) 'Output: - 12/30/1899 02:00:00 PM d="12-19-2024" mytime = FormatDateTime(d,3) 'Output: - ERROR as delimiter should be same as locale’s delimiter
vbShortTime: para obtener la hora en formato de hora corta, se transfiere el valor 4.
Muestra una hora usando el formato de 24 horas (hh:mm).
Ejemplo 5:
Dim d, mytime d="12/19/2024" mytime = FormatDateTime(d,4) 'Output: 12/19/2024 12:00:00 AM d="12/19/2024 02:30 PM" mytime = FormatDateTime(d,4) 'Output: - 12/19/2024 02:30:00 PM d="14:30:10 12/19/2024" mytime = FormatDateTime(d,4) 'Output: - 12/19/2024 02:30:10 PM d="02:30 PM 12/19/2024" mytime = FormatDateTime(d,4) 'Output: - 12/19/2024 02:30:00 PM d="12/19/2024 2pm" mytime = FormatDateTime(d,4) Output: - 12/19/2024 02:00:00 PM d="2 pm" mytime = FormatDateTime(d,4) 'Output: - 12/30/1899 02:00:00 PM d="12-19-2024" mytime = FormatDateTime(d,4) 'Output: - ERROR as delimiter should be same as locale’s delimiter