Using Macro to copy data from sheet3 to sheet1

Using Macro to copy data from sheet3 to sheet1

I would like to copy data using a macro ..... copy data from cell A2 thru A18 on sheet3   to B12 thru B28 on sheet1

thank you