VBA loop for copy rows and paste special for columns

Hi,

i would like to write code that will copy rows and paste them for one column (in one list).
For example: i'd like to copy range A1:C3 and paste it for one column.

Could you help me?