Foro Excel

Hola amigos
Pues resulta que tengo puesto este codigo para que me de la fecha completa, y no se porque, el dia me sale que es domingo
No se que puede pasar
saludos Bel


Dim hora As Double
Dim saludo As String
Dim leyenda As String
hora = (Now - Int(Now)) * 24
tiempo = Format(Now(), "Short Time") 'o Medium Time
nombre = Trim(Range("A50").Text)
apodo = Trim(Range("A55").Text)

Dim fecha
Dim de As String
de = de
fecha = Format(Now(), "dddd d")
fecha1 = Format(Now(), "mmmm")
fecha2 = Format(Now(), "yyyy")

termino de probarlo con :
Sub fechar()



Dim hora As Double
Dim saludo As String
Dim leyenda As String
hora = (Now - Int(Now)) * 24
tiempo = Format(Now(), "Short Time") 'o Medium Time
nombre = Trim(Range("A50").Text)
apodo = Trim(Range("A55").Text)

Dim fecha
Dim de As String
de = de
fecha = Format(Now() + 1, "dddd d")
fecha1 = Format(Now() + 1, "mmmm")
fecha2 = Format(Now() + 1, "yyyy")

MsgBox fecha & ", " & fecha1 & " de" & " de " & fecha2


End Sub
sume Uno para simular que estoy en domingo y me dio DOMINGO. Aun cuando me parece que modificaria varias cosas de este código simplificandolo, funcionar, funciona.

GALI

Pues me sigue dando error.. me sale que hoy es lunes
ayí¹da por favor
Bel

Belinda:

creo que deberias modificar la fecha del sistema,pulsando en el area conocida como systray.

ahi precisamente donde se muestra la hora y fecha del sistema.
con doble clic accedes a el y verifica que este configurado con la fecha correcta.
yo acabo de hacer esto pues me arrojaba un error y al actualizar la fecha (que seguramente la cambie ) el error se corrigio.

la propuesta del teacher gali es como el lo dijo para "simular".
yo intente esta para que me diera el dia correcto
fecha = Format(Now()-3, "dddd")
pero no hay necesidad si actualizas la fecha al tiempo correcto(yo o tenia en Abril)

intenta mi propuesta y luego nos cuentas.

salu2

Belinda:

precisamente tenia el mismo problema y aunque en princippo lo solucione con la idea del teacher Gali con adaptandolo a mi codigo asi:
dia = Format(Now()-3, "dddd"),lo cual me funciono muy bien.

despues me percate que mi problema estaba en que tenia cambiada la fecha del sistema.
fui al "systray"(donde se muestra la fecha y hora del sistema),lo abri con doble clic y lo actualice a la fecha correcta.

si es necesario te subo el ejemplo.

salu2

ST supongamos que tenes cambiada la fecha del sistema: quiero creer que te darias cuenta de que la fecha que te presenta el sistema no solo es ES SABDAO CUANDO DEBIERA SER MIERCOLES, sino que ademas te ha dellamar la atencion el dia, expresado como ordinal en el mes en curso, o el mes.
etc
Ahora, esta concordancia la daba yo por comprobada.

GALI

Gracias, ya lo solucioné
El problema era tan simple como que tenia un codigo de visualizacion de la fecha mal puesto y por eso me salia mal... y yo volviendome loca
Menos mal que tenia guardada una hoja anterior en la que el resultado era correcto, lo comprobé y di con ello.
Gracias a todos
bel