VBAの画面のちらつきがたった1行で解決して処理も高速化
VBAコード処理の前に
Application.ScreenUpdating = False
と書いて、画面更新処理を停止します。
最後に(End Sub)の前に
Application.ScreenUpdating = True
と書いて、画面更新処理を再開(元に戻す)します。
———————–
Sub 画面更新停止()
Application.ScreenUpdating = False
******
Application.ScreenUpdating = True
End Sub
———————–
サブフォームのリクエリで、使えないときは
———————–
‘フォームの描画をOFF
Me.Painting = False
Me.明細フォーム.Requery
‘フォームの再描画をON
Me.Painting = True
———————–