vba code om data te plaatsen in rij 1 vanaf kolom 3

[arjoderoon]

ik heb onderstaande code:

Sheetnames = Array("cdt bhw", "cdt bh1", "cdt bh2")

For i = LBound(Sheetnames) To UBound(Sheetnames)
    With Sheets(Sheetnames(i))
        .Range(.Range("N1"), .Cells(.Rows.Count, 1).End(xlUp)).Copy Sheets("bronblad zelfzorg").Cells(Rows.Count, 1).End(xlUp).Offset(1, 3)
    End With
Next i

hoe kan ik deze code zo aanpassen dat deze vanaf de bladen in de array alle data kopieert, en deze op het blad 'bronblad zelfzorg' plaats (onder elkaar, maar dan niet in de eerste kolom, maar in de derde?

ik dacht dit gedaan te hebben door de offset (1,3) neer te zetten (dit was 1,0) maar toen moest het op een ander blad terecht komen in kolom A.

Nu komt er niks te staan helaas...

 

[huijb]

Ik zie geen reden om je vraag twee keer te plaatsen. Is ook tegen de regels waarmee je akkoord bent gegaan. Hier verder http://www.helpmij.nl/forum/showthr...de-om-data-te-plaatsen-in-rij-1-vanaf-kolom-3