Insert this line to your code
Range("B3:B100").Copy Destination:=Range("C3:C100")
The range destination can be changed depending on which range you want to paste the data.
Insert this line to your code
Range("B3:B100").Copy Destination:=Range("C3:C100")
The range destination can be changed depending on which range you want to paste the data.