画面描画抑止 †計算の高速化や計算途中の画面の内容を見せたくない場合に画面描画を抑止します。 次は簡単なサンプルです。 Sub example1900()
Dim i As Long
Application.ScreenUpdating = False
For i = 1 To 5000
Cells(i, 1) = i
Next i
Application.ScreenUpdating = True
End Sub
Last-modified: 2014-03-11 (火) 01:58:42 (4296d)
|