Slow code

[TorontoNewf]

Greetings,

I have the following code which is REALLY

For Each pi In pt.DataPivotField.PivotItems    
      pi.Caption = Pi.Caption & " "
Next pi

How do I make this faster?
Is there something that I am missing here?

Thanks,

 

[tommylee_b]

Maybe oversimplifying but you could try:

Application.ScreenUpdating = False

For Each pi In pt.DataPivotField.PivotItems    
      pi.Caption = Pi.Caption & " "
Next pi

Application.ScreenUpdating = True

 

[TorontoNewf]

I hadn't used this, as it was not really a complex macro.
Nonetheless, I tried it this morning with the suggestion, and there is no doubt - it was faster.
However, even without the ScreenUpdating, Excel itself was much faster this morning.

I did get Excel 2016 installed last week, and
my machine DID get a reboot over the weekend,
so perhaps that's all that needed to be done.
Automatic updates always seem to be monitored.

O happy day!

That being said, I do thank you for your input.

Cheers,