Jump to content
jose lopez contreras

Macro que se ejecute solo el fin de año

Recommended Posts

Hola,

Pues no se que puede pasar, es tan sencillo el codigo que tu mismo lo podrias reparar.

Yo pondria un punto de interrupción en el If ...... y ver que datos esta pasando y actuar en consecuencia, es que el codigo no tiene mas complicación. No se me ocurre otra cosa.

Share this post


Link to post
Share on other sites

Sino pasa es que esta igualdad es falsa. Por lo tanto ahí es donde esta el problema. Haz seguimiento a los datos que recojen las variables  y vete depurando. Si sabes usar debug úsalos y sino ponte msgbox para ver que valor cojen.

por ejemplo

No sé ayudar más.

...
msgbox VBA.Format(CDate(fecha), "yyyy") + 1 & "/" & VBA.Format(Date, "yyyy")
If VBA.Format(CDate(fecha), "yyyy") + 1 = VBA.Format(Date, "yyyy") Then
...

Share this post


Link to post
Share on other sites

@ikanni seguí tu recomendación y usando el debug obtuve la siguiente información que te anexo en la siguiente imagenes y como veras si se cumple el If pero no se ejecuta la macro para guardar la hoja en otro libro. te comento que dicha macro para guardar la hoja en otro libro si a ejecuta sola si funciona. algo esta raro no creen.

 

Presentación1.jpg

Presentación2.jpg

Presentación3.jpg

Presentación4.jpg

Share this post


Link to post
Share on other sites

Hola Jose,

No veo las imagenes, pero da igual si cumple la condición eso significa que lo que te puse funciona.:), pero el código para hacer la copia pues parece que no te funciona. Ahora no tengo tiempo ayudarte....

Doy por hecho que te crea la nueva hoja con el año nuevo y te hace el resto, entonces parece ser que te falla :

....
        Workbooks("Control JOLOCO Almacenes V 9.9.4.xlsm").Worksheets("Salidas").Copy _
                  After:=Workbooks("Reporte anual de Salidas.xlsm").Sheets(1) ' copiar hoja en otro libro
.......

Sigue el codigo Paso a Paso y mira a ver porque no te hace la copia, seguro que encuentras la solución. Si luego sí tengo teimpo me paso y veo...

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

×
×
  • Create New...

Important Information

Privacy Policy