Macro que recorra hojas y detecte fechas para activar copiado y pegado

Sera que me puedas ayudar con una macro que recorra una fila de 5 hojas en especifico

En este caso la fila 938

Y las fechas estan en las col. J, V, AH, AT, BF, BR, CD, CP, DB, DN, DZ, EL, EX, FJ

Hay 7 fechas de la semana

Entonces quisiera una macro que al EJECUTAR este recorra la fila 938 y detecte el ultimo día del mes en todas las hojas, en la hoja que se encuentre el ultimo día del mes entonces cuente 3 col. Hacia la derecha y copie de la fila7 ala 934 para luego pegar en otro libro.

En caso de que las hojas no tenga el ultimo día del mes entonces un msgboix que indique que no existe fecha final del mes.

1 respuesta

Respuesta
2

Me puedes comentar lo siguiente:

- Cuál mes, ¿el mes de la fecha actual?

- Cuál libro, ¿cómo se llama el libro a dónde se van a copiar?, ¿En cuál hoja? ¿Y a partir de cuál celda?

- ¿Si no tienen el último día del mes quieres un mensaje por hoja?

OK

El libro se le pone una fecha inicial en este caso

Se le puso 4/02/2016 en la celda B1 pero esto puede variar entonces en las filas va agarrando a partir de esa fecha 7 días con la fórmula =b1+1

ESTO EN la primera hoja

En la segunda hoja respetando las filas y la columnas esta:

!hoja1!=b1+7 para seguir avanzado con las fechas asi hasta llegar ala quinta hoja y aplicando la misma formula si en la hoja 5 llego al fin de fecha del mes ( en este caso febrero entonces copiar 3 col ala derecha rango esto quiere decir que si mi fin de mes cayo en la col. CP se corre 3 columnas y copia apartir de la fila 7 hasta la fila 934) NO ES necesario que se pegue solo que marque la seleccion de copia

Para entender bien.

  1. En la celda B1 tienes 4/02/2016, entonces el mes es Febrero, luego entonces el último día del mes de febrero de 2016 es 29. ¿De acuerdo?
  2. Lo que tiene que hacer la macro es buscar el 29 de febrero de 2016 en las celdas de la fila 938. ¿De acuerdo?
  3. Si encuentra la fecha, entonces que se recorra 3 columnas hacia la derecha y que marque la columna para copiar. ¿De acuerdo?

Podrías responde brevemente y en ese orden.

  1. En la celda B1 tienes 4/02/2016, entonces el mes es Febrero, luego entonces el último día del mes de febrero de 2016 es 29. ¿De acuerdo?

R:   CORRECTO

  1. Lo que tiene que hacer la macro es buscar el 29 de febrero de 2016 en las celdas de la fila 938. ¿De acuerdo?

R: CORRECTO, los días están de menor a mayor en las 5 hojas del libro que están en las fila 938 y en las mismas columnas en todas las hojas

  1. Si encuentra la fecha, entonces que se recorra 3 columnas hacia la derecha y que marque la columna para copiar. ¿De acuerdo?

R: CORRECTO, si encuentra la fecha de donde la encontró recorrer tres col ala derecha y luego copiar a partir de la fila 7 ala 934

Otro par de dudas:

1. Dices que la fecha va a estar en la celda B1, ¿pero de cuál hoja?

2. Si copio las celdas de la hoja1, y después copio las celdas de la hoja2, las primeras celdas ya no estarán marcadas para copiar. ¿Entonces?

Otro par de dudas:

1. Dices que la fecha va a estar en la celda B1, ¿pero de cuál hoja?

SIEMPRE estará en la primera hoja la fecha inicial B1

2. Si copio las celdas de la hoja1, y después copio las celdas de la hoja2, las primeras celdas ya no estarán marcadas para copiar. ¿Entonces?

En la hoja 4 u hoja 5 por ahí de ahí siempre se ponen las ultimas fechas del mes, ya que cada hoja esta de a 7 días, entonces si en la hoja 4 esta el fin de mes entonces recorre 3 y copia

Envíame tu archivo y me explicas paso a paso con un ejemplo.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas