Jeg har denne makro, som skal starte i række 10. Her skal den så kopiere det der står i fx A10 ned i de tomme celler nedenunder. Herefter skal den finde den næste celle med indhold og kopiere det ned i de tomme celler. Det samme skal ske for en anden kolonne.
Jeg har dette: Range(“A:A,G:G).Select Selection.SpecialCells(xlCellTypeBlanksJ.Select Selection.FormulaR1C1 = “=R[-1]C”
Problemet er at som den er nu, så starter den ikke på række 10 og den fortsætter bare i det uendelige. Jeg vil have den til at starte på række 10 og så stoppe når der er en tom række da det er forskelligt, hvor mange rækker der er.
Jeg kan ikke få det du skriver til at virke finb :(
Jeg skal prøve med et eksempel.
A G 10: hej Ok 11: Tom celle Tom celle 12: farvel Tom celle 13: Tom celle Nej 14: Tom celle Tom celle
Der står så andet data i nogle af de andre kolonner, men det er kun i kolonne A og i kolonne G at der er noget data der skal kopieres. De tomme celler i kolonne A og kolonne G skal udfyldes med det der står i cellen ovenover. Det skal fortsætte indtil der ikke er flere rækker med data, altså fx til og med den sidste række, hvor der er data i fx kolonne E. Det er forskelligt hvor mange rækker der er i de dokumenter, hvor der skal ske kopiering.
Den skal så først starte på række 10 da der fremgår andet data i rækkerne 1-9, som der ikke skal ske kopiering i.
FØR: A G 10: hej Ok 11: Tom celle Tom celle 12: farvel Tom celle 13: Tom celle Nej 14: Tom celle Tom celle EFTER: Vi eksempel her........
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.