Turn off/on auto calc when entering or leaving a specific workshee

R

Rominall

This is probably a really easy thing but I can't figure it out.
I need to turn auto calc except tables when a user goes to worksheet PIVOT
and turn it back to full auto calc when they exit.

I've tried on SheetActivate with the following code.
With Application
.Calculation = xlSemiautomatic
.MaxChange = 0.001
End With
ActiveWorkbook.PrecisionAsDisplayed = False

But the pivot table will still auto calc. Maybe I'm not understanding the
settings.

End result is that with FULL auto calc turned on a few macros that
add/remove pivot table fields don't work properly so the auto calc shouldn't
happen.
 
J

Jim Rech

The "tables" referred to are data tables not pivot tables so this option
will not help you.

You can control whether an entire sheet calculates using the sheet's
EanbleCalculation property. I assume this would affect pivot tables on the
sheet but I'm not sure.

--
Jim
| This is probably a really easy thing but I can't figure it out.
| I need to turn auto calc except tables when a user goes to worksheet PIVOT
| and turn it back to full auto calc when they exit.
|
| I've tried on SheetActivate with the following code.
| With Application
| .Calculation = xlSemiautomatic
| .MaxChange = 0.001
| End With
| ActiveWorkbook.PrecisionAsDisplayed = False
|
| But the pivot table will still auto calc. Maybe I'm not understanding the
| settings.
|
| End result is that with FULL auto calc turned on a few macros that
| add/remove pivot table fields don't work properly so the auto calc
shouldn't
| happen.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top