Ejecutar código según fecha

2 envíos / 0 nuevos
Último envío
tetorin
Imagen de tetorin
Offline
última acción: Hace 7 meses 1 semana
Nivel 1 - 200 puntosNivel 2 - 500 puntosNivel 3 - 1000 puntosNivel 4 - 2000 puntos
alta: 26/05/2011 - 02:57
Puntos: 3262
Ejecutar código según fecha

Buen dia a todos en el foro 

ojala y alguien me pueda ayudar,tengo dos codigos codigo 1 y codigo 2 , uno es para que se ejecute del dia 1 al 20 del mes y el segundo codigo del 21 al dia ultimo del mes ,

actualmente lo que hago es que cuando cambia a dia 21 del mes manualmente pego el codigo 2 y cuando enpieza el me vuelvo a pegar el codigo 1 en el modulo.

 

espero me puedan ayudar ya para no estar ejecutando esto manualmente

 

 

AdjuntoTamaño
Plain text icon codigo1_y_2_.txt11.46 KB

Etiquetas: 

pacomegia
Imagen de pacomegia
Offline
última acción: Hace 1 día 51 mins
Nivel 1 - 200 puntosNivel 2 - 500 puntosNivel 3 - 1000 puntosNivel 4 - 2000 puntosNivel 5 - 4000 puntosadministrador
alta: 27/12/2006 - 23:26
Puntos: 11175
DAY

La función Day devuelve como resultado el número de día de la fecha que se le pasa como argumento

si quieres comparar con la fecha actual puedes utilizar la función Date para obtener la fecha del sistema

Así que simplemente tienes que hacer una condición para elegir si ejecutas uno u otro código.

puedes tener ambas versiones con dos nombres distintos, por ejemplo apo1 y apo2

el código que controla tu código podría ser algo así:

Sub EligeSegunDia()

    If Day(Date) <= 20 Then

        apo1

    Else

        apo2

    End If

End Sub

 

 

------
Ya sé Excel, pero necesito más.