Copy entire selected column to next columns till last column

Hi,

I am struggling to to Copy entire selected column to next columns till last column.

As an example I want to copy selected column(lets say column B) and paste it to next column (column c) then paste special column b on itself as a value and repeat it till last column in sheet.

I tried the code below but it just do it on first 2 column not till last column. I know I made a mistake in loop, but I do not know how to fix it.

Please Login or Register  to view this content.

I do appreciated in advance for your time and help.

I found the solution guys

Here is the code:

Please Login or Register  to view this content.