• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Laatste 5 rijen kopieren en plakken

Status
Niet open voor verdere reacties.
E

Evelthoven

Gebruiker
Lid geworden
26 sep 2006
Berichten
690
Goedemiddag,

In het bijgesloten bestandje heb ik mijn vraag gesteld.
Ik wil graag met een macro wekelijks de laatste 5 rijen kopieren en plakken naar de eerste lege rij.

Kan iemand me helpen?
 

Bijlagen

  • Rijen kopieren en plakken.xlsx
    14,4 KB · Weergaven: 18
zoiets?

Code: 
Sub SjonR()
Cells(Rows.Count, 1).End(xlUp).Offset(-4).Resize(5).Copy Cells(Rows.Count, 1).End(xlUp).Offset(1)
End Sub
 
en deze trekt er ook nog lijntjes bij.
 

Bijlagen

  • Rijen kopieren en plakken (1).xlsm
    20,7 KB · Weergaven: 20
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan