nyan.vb
Sub foo()
'メインルーチン実行時のパフォーマンス改善に有効'
Application.Calculation = xlManual '再計算の停止'
Application.Calculation = xlAutomatic '再計算の再開'
Application.ScreenUpdating = True '描画の再開'
Application.ScreenUpdating = False '描画の停止'
End Sub
Go to list of users who liked
More than 5 years have passed since last update.
Sub foo()
'メインルーチン実行時のパフォーマンス改善に有効'
Application.Calculation = xlManual '再計算の停止'
Application.Calculation = xlAutomatic '再計算の再開'
Application.ScreenUpdating = True '描画の再開'
Application.ScreenUpdating = False '描画の停止'
End Sub
Register as a new user and use Qiita more conveniently
Go to list of users who liked