Selecteren van een cel (links) voor het plakken

[Asmaiac]

Misschien is er voor mijn vraag een eenvoudige oplossing, maar het schiet mij zo 1-2-3 even niet binnen.

Sheets("Blad2").Select
Selection.Copy
Application.SendKeys "{DOWN}"
Sheets("Blad1").Select
ActiveCell.Select
Application.SendKeys "{LEFT}"
ActiveCell.Select
ActiveSheet.Paste

Gewenste situatie:
- Actieve cel kopieeren van blad 2 (na het kopieeren automatisch 1 cel naar beneden voor de volgende keer)
- Terug naar blad 1 eerst 1 cel naar links en daar de inhoud van de gekopieerde cel uit blad 2 plakken.

Hoop dat iemand mij uit de brand kan helpen.


Groet

 

[leofact]

met activecell.offset(rij, kolom) kun je selecteren vanuit de actieve cel.
(1,0) = stap naar beneden (0,1) is stap naar rechts.

mvg leo

 

[Asmaiac]

Toppie! :thumb:

Problem solved!