Copy data column wise to new sheet with code

Hello Experts
I have written the code to create a new sheet along with headings. I am trying to copy the data from the source sheet (Consolidated) to the destination sheet (Sales) in some columns and insert formulas in some with the help of a code. I have written the beginning and end of the code as required, but I am not able to write the code to copy the data and resize the rows of destination sheet with the source sheet. I would really appreciate if someone can help me to get at least the first column then I can get the rest of the columns. The main problem is defining the variable and resizing the data.
Thank you in advance.