María Nuñez

Elsa Matilde respondió: Te dejo una rutina de ejemplo. Como empieza en la col 2, para los 12 meses el bucle llega hasta 23 Sub InsertaCol() ' x Elsamatilde ' For i = 2 To 23 Step 2 Cells(1, i).EntireColumn.Select Selection.Insert Shift:=xlToRight Next End Sub Sdos. No dejes...

Elsa Matilde respondió: Te dejo una macro explicada ... ajusta las referencias de las celdas donde vas a colocar los criterios. Sub CONSECUTIVO() 'x Elsamatilde 'se llena la col A a partir de fila 2. ini = 13 'se llena hasta llegar a la fila indicada en D1 - AJUSTAR While...

Elsa Matilde respondió: Te estoy enviando tu libro con la nueva macro. Observa que utilizo el mismo bucle para enviar las 4 columnas en lugar de hacer un For para cada una como lo tenías inicialmente. Se recorre la col A de hoja1 y se completan tantas filas como las...

Elsa Matilde respondió: Entiendo que tendrás una hoja con datos y espacios vacíos en col A: Entonces para rellenarlas en primer lugar debes establecer la última fila que debe ocuparse con el último negocio, en este ejemplo llegará hasta la fila 21. Entra al Editor de macros...

Elsa Matilde respondió: Te estoy respondiendo con una macro en tu nueva consulta. Aquí solo quiero aportar un truco de cómo insertar filas, quizás ya lo has hecho así... sino viene bien la idea para otras ocasiones. Nota: tema desarrollado en mi Manual Excel.