Aumentar 10% al abrir por 1ª ves el libro en el mes

2 envíos / 0 nuevos
Último envío
JoaoM
Imagen de JoaoM
Offline
última acción: Hace 14 horas 13 mins
Nivel 1 - 200 puntosNivel 2 - 500 puntosNivel 3 - 1000 puntosNivel 4 - 2000 puntos
alta: 15/12/2011 - 23:46
Puntos: 2750
Aumentar 10% al abrir por 1ª ves el libro en el mes

Solicito una ayuda para una fórmula (tal vez) o macro que me aumente el 10% de los valores que existen en la columna D, SOLO CADA 1ª ves que en el mes abra el libro.
Se trata de dos rangos D3 a D11 y D16 a D24, pero lo que pretendo seria ¿mejor una macro? por lo siguiente, expongo:
En el mes puede que se abra el libro varias veces, pero la macro auto - ejecutarse SOLO la 1ª ves en el mes en curso que se abra el libro. (Macro en ThisWorkbook supongo)


Al abrir el libro la 1ª VES EN MES en curso auto - ejecutarse la macro >> crear una hoja llamada Copia >> copiar el contenido de los 2 rangos de la hoja Tabla2 a hoja Copia >> proceder aumentar el 10% de los valores en los 2 rangos en Tabla2. Final de la ejecucion de la amcro.

Verifico el resultado entre "Copia" y "Tabla2" y SI TODO FUE BIEN EL AUMENTO DEL 10%. elimino yo la hoja "Copia"
Solo eso. No tengo idea sobre como programar una macro.

GraciasLos 2 rangos en D

Etiquetas: 

Cron
Imagen de Cron
Offline
última acción: Hace 4 horas 4 mins
Nivel 1 - 200 puntosNivel 2 - 500 puntosNivel 3 - 1000 puntosNivel 4 - 2000 puntosNivel 5 - 4000 puntos
alta: 23/06/2010 - 12:30
Puntos: 12285
Yo pondría la madro en

Yo pondría la madro en Thisworkbook Open

Una vez ahí, la macro averigua la fecha, y comprueba que el mes de la fecha actual no coincide con el mes de la fecha que hemos guardado en una celda determinada (puede ser una celda oculta, con el texto del mismo color que el fondo, en la columna XFC... lo que prefieras)

Si coincide, entonces  exit sub. Si no coincide, entonces hace lo que tiene que hacer (en tu caso aumentar un 10% algunos valores) y luego vamos a la celda de antes y ponemos la fecha del día.

 

Espero que te sirva la idea.

 

Un saludo