Hola a todos y Feliz Año Nuevo. Planteo mi problema al que no encuentro solución tras haber intentado resolverlo de varias formas y consultar algunos post aquí en el foro. Intuyo que tiene que ser algo sencillo pero no lo consigo. La cuestión es, un formulario donde tengo un campo llamado FEntrega y que es de formato fecha corta, mascara entrada 00/00/0000 y en la tabla se recoge como campo Fecha/hora. En VBA quiero que al actualizar el campo, con un If, si la fecha de entrega coincide con el 6 de enero de cada año, en otro campo de texto me ponga "MAÑANA". Pues bien, si lo implemento asi:
If FEntrega= "06/01/2017" Then
Turno= "MAÑANA"
IdTipoRosco.SetFocus
End If
funciona bien
Pero si lo pongo de este otro modo:
If FEntrega= #06/01/2017# Then
Turno= "MAÑANA"
IdTipoRosco.SetFocus
End If
no funciona
Si pongo:
If FEntrega= #06/01/& Year(Date) & # Then
Turno= "MAÑANA"
IdTipoRosco.SetFocus
End If
tampoco funciona
If FEntrega= "06/01/ & Year(Date) &" Then
Turno= "MAÑANA"
IdTipoRosco.SetFocus
End If
tampoco funciona
La idea es que la fecha del 6 de enero sea la del año que tenga el sistema en cada momento.
Por favor, ¿alguien podría indicarme que es lo que hago mal?.
Gracias
Tweet
Comparar fecha con otra determinada
Opciones del Tema
