Help with VBA!

[Nicolassoong]

Good day to all,

As I’m fairly new in VBA.. Appreciate if you could help me on this!

So I have this excel workbook with a set of raw data (workbook1) which i wanna automate to import/copy&paste the data to another workbook (to open workbook2 with dialogbox). Eg:

Cell (A1:J1) (Workbook1) copy & paste data to
Cell (A1:J1) (Workbook2)

Thereafter, the macro will automatically run for the next 235 set of data and offsetting 1 row down. Eg:

Cell (A3:J3) (Workbook1) copy & paste data to
Cell (A3:J3) (Workbook2)
.
.
.
.
.
.
Cell (A235:J235) (Workbook1) copy & paste data to
Cell (A235:J235) (Workbook2)


Thanks in advance!!

 

[Richard U]

The easiest way is just to set two range values equivalent to each other.

workbook2.Sheets(1).range("A3:J235").value =  workbook1.Sheets(1).range("A3:J235").value

 

[Nicolassoong]

Hey! Thanks for responding. But by doing so, does it offset the cells ?

 

[Richard U]

Hey! Thanks for responding. But by doing so, does it offset the cells ?

No, to do the offset, you'd need something like this....

sub copy_em()
Dim ctr as integer

for ctr = 1 to 235 step 2
     workbook2.Sheets(1).range("A" & ctr & ":J" & ctr).value =  workbook1.Sheets(1).range("A" & ctr & ":J" & ctr).value
next ctr

end sub