Macro rijen tellen en zelfde aantal plakken op ander blad

[erwinb999]

Hallo,

Ik loop vast met een macro.
Ik wil dat de macro kijkt op blad1 hoeveel rijen er in gebruik zijn, en dat ie vervolgens:
- naar blad2 gaat
- rij 2 kopieert
- :shocked:vervolgens een selectie maakt van rij3 t/m hetzelfde rijnummer als de laatste van blad1 :shocked:
- en daar plakt

Ik krijg het echter niet voor elkaar om de selectie van het juiste aantal rijen te maken.
Weet hier iemand een oplossing ?

 

[snb]

sub zodus()
  with Blad1.cells(1,1).currentregion.offset(1)
    Blad2.cells(1,1).resize(.rows.count)=.value
  end with
End sub