Avoid selecting.

For example:

Range("A1").Select
Selection.Copy
Range("A2").Select
Activesheet.Paste

Can be replaced by:

[a1].copy [a2]

This is much faster

--
Kind regards,

Niek Otten

"Mike" wrote in message ups.com...
| Niek, Thanks for the advice. I went to the site and purchased the xla
| anyway. Probably take me a month of Sundays to go thru' it all and see
| how it can improve my workbook's perrformance. Have you got any advice
| that can assist in the short term?
|