** NORMAS DEL FORO **
Inicio del foro Inicio del foro > Access y VBA > Access y VBA
  Mensajes nuevos Mensajes nuevos RSS - Semanas y fechas
  Preguntas frecuentes Preguntas frecuentes  Buscar en el foro   Eventos   Registro Registro  Iniciar sesion Iniciar sesion

Tema cerradoSemanas y fechas

 Responder Responder
Autor
Mensaje
DimNameAsString Ver desplegable
Nuevo
Nuevo
Avatar

Unido: 06/Noviembre/2018
Localización: Bilbao
Estado: Sin conexión
Puntos: 3
Enlace directo a este mensaje Tema: Semanas y fechas
    Enviado: 06/Noviembre/2018 a las 14:21
Muy buenas,

Pues bien, tengo un formulario en el que se introduce una fecha y necesito calcular el número de semana y el día de la semana al que corresponde esa fecha. Creo que ya se como se hace para sacar el día de la semana con TEXT pero ni idea de como programar una macro para calcular el número de la semana.

Alguna idea?
Arriba
xavi Ver desplegable
Administrador
Administrador
Avatar
Terrassa-BCN

Unido: 10/Mayo/2005
Localización: Catalunya ||||
Estado: Sin conexión
Puntos: 11636
Enlace directo a este mensaje Enviado: 06/Noviembre/2018 a las 14:49
Hola,

MiSemana = Format(Me!CampoFecha, "ww")

MiDiaSemanaNumero = Weekday(Me!CampoFecha, vbMonday)
 
MiDiaDemanaTexto = WeekdayName(Weekday(Me!CampoFecha, vbMonday)) ' Nota: en idioma del SO


Mira las ayudas para Format, WeekDay y WeekdayName para saber los argumentos posibles.

Un saludo
Xavi, un minyó de Terrassa

Mi web
Arriba
DimNameAsString Ver desplegable
Nuevo
Nuevo
Avatar

Unido: 06/Noviembre/2018
Localización: Bilbao
Estado: Sin conexión
Puntos: 3
Enlace directo a este mensaje Enviado: 08/Noviembre/2018 a las 10:04
Gracias, el código MiSemana = Format(Me!CampoFecha, "ww") me da exactamente lo que necesitaba
Arriba
 Responder Responder
  Compartir tema   

Ir al foro Permisos de foro Ver desplegable