Hi famdamly,

If worksheet calculation is the cause of the slow macro execution you
can speed things up by:
1. Detecting the calculation mode early in the macro code using...

Dim CalcMode
CalcMode = Application.Calculation

2. Then switching to manual calculation mode using...

Application.Calculation = xlCalculationManual


3. Reverting to the initial calculation mode at the end of your macro
code using...

Application.Calculation = CalcMode


Ken Johnson