code question
BTW, it took about 1 sec on my machine, what do you have?
--
HTH
Bob Phillips
"Gary Keramidas" wrote in message
...
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
|