VBA-シートイベントの制御
VBA-シートイベントの制御
Excelシートへの編集処理において、シートイベントを制御することで処理を高速化することができます。
シートイベントをOFFにする
Public Function _
OffEventHandler() As Boolean
On Error GoTo ErrHandler
Application.ScreenUpdating = False
Application.EnableEvents = False
Application.Calculation = xlCalculationManual
OffEventHandler = True
Exit Function
ErrHandler:
End Function
シートイベントをONにする
Public Function _
OnEventHandler() As Boolean
On Error GoTo ErrHandler
Application.ScreenUpdating = True
Application.EnableEvents = True
Application.Calculation = xlCalculationAutomatic
OnEventHandler = True
Exit Function
ErrHandler:
End Function