La función Access DatePart no dará el número de semana correcto cuando se use en un cuadro de texto de formulario tabular Control Source.
Estoy tratando de crear un formulario tabular en Access que liste la fecha y el número de semana para cada registro. Cuando utilizo la opción de formato en la hoja de propiedades del cuadro de texto (ww), mis semanas están desfasadas en una semana (la semana del 19 de diciembre de 2021 se considera la semana 52). He conseguido corregir esto en un campo no enlazado en el encabezado utilizando VBA:
DatePart("ww", Date, vbSunday, vbFirstFourDays)
pero no puedo hacer que el mismo código funcione en el origen de control del cuadro de texto para el formulario tabular. Puedo obtener la misma respuesta incorrecta de la semana 52 utilizando:
=DatePart("ww", [dtmEventStartDate])
pero ambas opciones siguientes me dan un error “#Nombre?” en el cuadro de texto cuando se carga el formulario:
=DatePart("ww", [dtmEventStartDate], [vbSunday], [vbFirstFourDays])
=Format([dtmEventStartDate], [ww], [vbSunday], [vbFirstFourDays])
Curiosamente, la ayuda emergente para el origen de control parece indicar que el formato que estoy utilizando está soportado, pero luego no funciona. ¡Cualquier ayuda sería muy apreciada!
davy.ai
Solución para mostrar el número de semana correcto en un formulario tabular de MS Access
Cuando se utiliza la opción de formato en la propiedad del cuadro de texto para el número de semana (ww), el resultado puede mostrar un número de semana incorrecto (es decir, la semana del 19 de diciembre de 2021 se muestra como semana 52 en lugar de semana 51). Este problema se puede solucionar en un campo no vinculado en el encabezado utilizando código VBA:
DatePart("ww", Fecha, vbSunday, vbFirstFourDays)Sin embargo, al intentar utilizar el mismo código en el origen de control del cuadro de texto para el formulario tabular puede no funcionar. Al usar el siguiente código, se mostrará un mensaje de error “#Nombre?” en el cuadro de texto cuando se cargue el formulario:
=DatePart("ww",[dtmFechaEventoInicio],[vbSunday],[vbFirstFourDays])O
=Format([dtmFechaEventoInicio],[ww],[vbSunday],[vbFirstFourDays])Aunque la ayuda emergente para el origen de control sugiere que el formato es compatible, no funciona. Para solucionar este problema, la sintaxis correcta es la siguiente:
=DatePart("ww",[dtmFechaEventoInicio],2,2)El cuarto parámetro es opcional y especifica el primer día de la semana. El valor predeterminado es domingo (valor del parámetro 1). Al especificar el segundo parámetro como 2, se asegura de que el número de semana se calcule utilizando el estándar ISO 8601 (que es ampliamente utilizado y reconocido). Al especificar el tercer parámetro como 2, se asegura de que el primer día de la semana sea el lunes.
Por lo tanto, al utilizar este código actualizado se mostrará el número de semana correcto en el formulario tabular:
=DatePart("ww",[dtmFechaEventoInicio],2,2)