way to automate this process

[rodchar]

hey all,
i have a excel sales summary report that comes out every week. i was
wondering if there was a way to extract the Current Order Amount column from
the report and place it in a new excel worksheet in say column A.

Then when the next report comes out take that same column in put it column B
to see a comparison of the Current Order Amounts?

And is there a way to do this automagically?

thanks,
rodchar

 

[Don Guillett]

You don't say which is the source column. Also, is the info in only ONE
column?

If desired, send your file to my address below along with this msg and
a clear explanation of what you want and before/after examples.

 

[rodchar]

Basically, an excel file gets generated like the info below

Sales rep, Sales amt
Joe, $5

So, what i want to do is take the sales amt column for each file that gets
generated and put the columns in a new worksheet

rep, week1, week2
Joe, $5, $10,

 

[Don Guillett]

Assuming source sheet is named sheet1 and destinationsheet is sheet2. This
should do it

Sub copycolbtonextcolinsheet2()
With Sheets("sheet2")
dlc = .Cells(2, Columns.Count).End(xlToLeft).Column + 1
Sheets("sheet1").Columns(2).Copy .Cells(1, dlc)
End With
End Sub

 

[rodchar]

thanks for the help,
rod.

Assuming source sheet is named sheet1 and destinationsheet is sheet2. This
should do it

Sub copycolbtonextcolinsheet2()
With Sheets("sheet2")
dlc = .Cells(2, Columns.Count).End(xlToLeft).Column + 1
Sheets("sheet1").Columns(2).Copy .Cells(1, dlc)
End With
End Sub
--
Don Guillett
Microsoft MVP Excel
SalesAid Software
(e-mail address removed)