copy and paste value with condition

[elsuji]

Dear Mana,

Thanks for your reply.

I checked your code. It is copying only one column values.

I changed the month manually for checking purpose and run the code, is not working

I think in code it is defined only for the April month. Because of that it is not copy paste the other month values.

Code: DstWks.Cells(i + 2, m + 4) = Sheets(1).Cells(RngList(Val) + 2, m + 4)

But i want it should check the current month and copy paste the previous month data for all the months.

Can you please check and update me