Why can't I turn off ScreenUpdating

[dave8]

I'm trying to set Applicaton.ScreenUpdating = False. But when the code executes, ScreenUpdate is still set to True.

Private Sub CommandButton1_Click()
   Dim r As Range
   Dim rowRtn, name As String
   
   Application.ScreenUpdating = False
   name = "AcctID"
   Sheets("Sheet2").Activate
   Sheets("Sheet2").Range("A1").Select
   
   Set r = ThisWorkbook.Names("" & name & "").RefersToRange

            ' Do something.....

End Sub

I execute this line by line and the value is still set to True. Why is that?

 

[shg]

Stop activating and selecting.