VBA Speed up

[sparx]

Can anybody shed some light on how I make the following and lots more formula's like it run much faster or streamline the code.

Windows("Materials Manager - old").Activate
Sheets("Suppliers").Select
Range("AC6:AV14").Select
Selection.Copy
Windows("Materials Manager.xls").Activate
Sheets("Suppliers").Select
Range("AC6:AV14").Select
ActiveSheet.Paste

The code is jumping between 2 excel files - one called Materials Manager.xls and another called Materials Manager - old.xls - both files are open at the same time then the code and lots more liek it copies different parts of the data from one version to the new version but runs slow??

[Bob Phillips]

Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual

Workbooks("Materials Manager -
old").Worksheets("Suppliers").Range("AC6:AV14").Copy _
Workbooks("Materials
Manager.xls").Worksheets("Suppliers").Range("AC6:AV14")

Application.Calculation = xlCalculationAutomatic
Application.ScreenUpdating = True

--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)

"sparx" <[email protected]> wrote in
message news:[email protected]...
>
> Can anybody shed some light on how I make the following and lots more
> formula's like it run much faster or streamline the code.
>
> Windows("Materials Manager - old").Activate
> Sheets("Suppliers").Select
> Range("AC6:AV14").Select
> Selection.Copy
> Windows("Materials Manager.xls").Activate
> Sheets("Suppliers").Select
> Range("AC6:AV14").Select
> ActiveSheet.Paste
>
> The code is jumping between 2 excel files - one called Materials
> Manager.xls and another called Materials Manager - old.xls - both files
> are open at the same time then the code and lots more liek it copies
> different parts of the data from one version to the new version but
> runs slow??
>
>
> --
> sparx
> ------------------------------------------------------------------------
> sparx's Profile:
http://www.excelforum.com/member.php...o&userid=16787
> View this thread: http://www.excelforum.com/showthread...hreadid=536705
>

[sparx]

Thanks for assisting - Excel file now transfers to new Excel file so much quicker than before. Thanks for helping.