Have you looked in tools, options, calculations and made sure th
Automatic is checked? you could also add this line to your code if yo
like:-

With Application
.Calculation = xlCalculationAutomatic
End With

Hope this helps


Simo

--
Simon Lloy
-----------------------------------------------------------------------
Simon Lloyd's Profile: http://www.excelforum.com/member.php...nfo&userid=670
View this thread: http://www.excelforum.com/showthread.php?threadid=27549