This code is extremely ineffecient. It has to activate each workbook t
do every step. Is there a way to work within a file without activatin
it?

Windows("Package Tracking.xls").Activate
Call Sheets(1).Select(True)
r = 2
Do
i = 2
Do Until IsEmpty(Cells(i, 1))
Range(Cells(i, 1), Cells(i, 15)).Select
Selection.Copy
Windows("Master.xls").Activate
Cells(r, 1).Select
ActiveSheet.Paste Link:=True
Cells(r + 1, 1).Select
Windows("Package Tracking.xls").Activate
i = i + 1
r = r + 1
Loop
ActiveSheet.Next.Select
On Error GoTo Format
Loo

--
hyyft
-----------------------------------------------------------------------
hyyfte's Profile: http://www.excelforum.com/member.php...fo&userid=1318
View this thread: http://www.excelforum.com/showthread.php?threadid=26156