设置为False后，ScreenUpdating的值未更改

Question

我制作了一个小的vba脚本，以自动打开或关闭屏幕更新和计算。

这是我的代码：

Sub speed_up()

    If Application.Calculation = xlAutomatic Then
        Application.ScreenUpdating = False
        Application.Calculation = -4135
    Else
        Application.ScreenUpdating = True
        Application.Calculation = -4105
    End If

End Sub

关于计算，它运行良好。 在我即时窗口中，当我询问时

?Application.ScreenUpdating

我总是得到

True

正常吗？我是否应该交替得到false和True？