Carmita
03 de Septiembre del 2003

Hola a todos, hace unos días pregunté si es que se puede calcular el numero de semana, quisiera saber ahora como puedo saber a que periodo corresponde dicha semana, por ejemplo la semana n° 36 corresponde al periodo 1- 5 septiembre

Juan
03 de Septiembre del 2003

Recuerdo tu anterior pregunta, y si no recuerdo mal
tenías una fecha a partir de la cual obtenías el nº de la
semana.

Para saber el periodo al que corresponde la semana,
es más fácil calcular a partir de esa fecha que del nº
de semana.

Te pongo un ejemplo de como hacerlo:

Private Sub Form_Click()
Dim fecha As Date, fechaIni As Date, fechaFin As Date
Dim dia As Integer, msg As String
fecha = Now
dia = DatePart("w", fecha, vbMonday)
fechaIni = DateAdd("d", 1 - dia, fecha)
fechaFin = DateAdd("d", 6, fechaIni)
msg = "El dia:" & vbNewLine
msg = msg & Format(fecha, "Long Date", vbMonday) & vbNewLine
msg = msg & "Pertenece a la semana que va desde:" & vbNewLine
msg = msg & Format(fechaIni, "Long Date", vbMonday) & vbNewLine
msg = msg & "Hasta:" & vbNewLine
msg = msg & Format(fechaFin, "Long Date", vbMonday) & vbNewLine
MsgBox msg
End Sub

Si necesariamente debes calcularlo a partir del nº de
la semana, la cosa se complicará pues también necesitarás
el año para saber si empezó en lunes, martes...