Copy Paste macro

Excelats

New Member
Joined
Nov 4, 2008
Messages
1
Hi all

I have several individual sheets which are populated with data by the users during the week. This data needs to be collated into a single sheet on a weekly basis.

I would like to have a macro perfrom this task. I have attempted to record a macro for this task and perhaps amend it where it may be failing.

This is an example of what has been recorded: (note, only one of the individual sheets is shown in this code, also the number of items to be copied over will vary, hence the code should be able to copy a dynamic range):

Workbooks.Open Filename:= _
"N:\EVERYONE\Account Opening\CONTROL TOOLS\Updated Logs Oct 08\Assigned Work Items - Suneel Bhandari updated.xls"
Range("A2:AR" & Range("A" & Rows.Count)).Select
ActiveWindow.LargeScroll ToRight:=-4
ActiveWindow.SmallScroll Down:=-69
Selection.Copy
Windows("Completed Items Consolidated.xls").Activate
Windows("Consolidated sheet.xls").Activate
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False

Any and all help on this matter is much appreciated! :)
 

Forum statistics

Threads
1,082,629
Messages
5,366,645
Members
400,908
Latest member
currong

Some videos you may like

This Week's Hot Topics

Top