hi norman:
i added your code. it ran ok, still took a minute and a half. each formula
has 12 links to other files, so they are quite long. they're about 738
characters long to begin with.

thanks for the info and code
-
-


Gary


"Norman Jones" wrote in message
...
Hi Gary,

Independently of your code, I would suggest that you expand the
ScreenUpdate wrapper to include calculation and (while you are at it) also
include pagebreak displays. somehing like:

Dim CalcMode As Long
Dim PgBreakMode As Boolean

With Application
CalcMode = .Calculation
.Calculation = xlCalculationManual
.ScreenUpdating = False
End With

With ActiveSheet
PgBreakMode = .DisplayPageBreaks
.DisplayPageBreaks = False
End With


' Your code



With Application
.Calculation = CalcMode
.ScreenUpdating = True
End With

ActiveSheet.DisplayPageBreaks = PgBreakMode

End Sub

---
Regards,
Norman