Hi all,


I need a excel macro to copy the 3 rightmost columns to next 3 columns.


Eg.


if i have data from column A to Column G then I need to copy the data from Column E to Column G to copied to
Column H to Column J.

I cant hardcode the column names in macro as the column range may vary day to day.

Is there any way this can be done in an excel macro.

Please help me in this issue

Hi Vasanth,

Am Mon, 4 Jun 2012 13:10:07 +0000 schrieb Vasanth:

if i have data from column A to Column G then I need to copy the data
from Column E to Column G to copied to
Column H to Column J.

try:

LCol = Cells(1, Columns.Count).End(xlToLeft).Column
LRow = Cells(Rows.Count, 1).End(xlUp).Row

Range(Cells(1, LCol - 2), Cells(LRow, LCol)).Copy _
Destination:=Cells(1, LCol + 1)


Regards
Claus Busch
--
Win XP PRof SP2 / Vista Ultimate SP2
Office 2003 SP2 /2007 Ultimate SP2

Thanks claus .. It worked.