Saltar al contenido

Macro para insertar filas en blanco, respetando fórmulas

publicado

Hola. Tengo una base en la que por columnas introduzco diferentes datos. Necesito una macro que me cree filas en blanco para introducir nuevos registros, pero no me elimine el formato y las fórmulas, porque sin ellas el resto de la base no tiene sentido, y las personas que le darán uso no estarán atentas para arrastrar las fórmulas de las otras filas hacia las nuevas. Solo conseguí la macro que crea filas nuevas, pero me copia el valor de la fila superior, y si ordeno limpiar las celdas no consigo que me respete las fórmulas. A ver si alguien me puede ayudar, muchas gracias.

Featured Replies

publicado

Te pongo este ejercicio y adáptalo a tu reporte, en la macro te indico los cambios que pudieras hacer

Espero te sirva. Suerte

Inserta Linea.xlsm

publicado

Más o menos esto podría valer, pero tal como te recomienda el amigo Toldeman, mejor sube tu archivo.

Application.ScreenUpdating = False
x = Range("A" & Rows.Count).End(xlUp).Row
Rows(x + 1).Insert
Rows(x).Copy: Rows(x + 1).PasteSpecial xlFormats
For Each celda In Rows(x).SpecialCells(xlFormulas)
   celda.Copy celda.Offset(1)
Next

 

publicado
  • Autor

Muchísimas gracias a todos. He ido directa a probar la macro que me había dejado masticadísima JanLui y me ha salvado de un apuro. Genial!!!! Muy muy muy agradecida. Va de maravilla y es exactamente lo que quería.

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.