Hi,

I have code which copies Range("A1") and pastes into Range("c1").Then it loops to copy a2,a3,a4 and pastes in the same cell c1.

I just want to copy a1 and b1 instead of just a1 and paste into cell c1& c2.Then loop to copy a2&b2 till end.

SUB LOOPING_2CELLS()

Dim rngCell As Range

For Each rngCell In Sheets("SHEET1").Range("A1", Sheets("SHEET1").Range("A" & Rows.Count).End(xlUp))
  Sheets("SHEET1").Range("C1").Value = rngCell.Value


Next rngCell

END SUB