VBAマクロの実行中に「すべて」をオフにする

Question

VBAマクロコードがあります。主な目的は、ワークブックから別のワークブックにデータをコピーすることです。行だけが変化します。マクロは、宛先シートで条件付き書式設定を行うまでは十分速かった。

私の質問は、マクロが実行されている間にExcelで各側の操作を無効にする方法があるかどうかです。今、私はこれらを無効：

Application.ScreenUpdating = False 
Application.DisplayAlerts = False 
Application.EnableEvents = False 

しかし、私は、私はより速くそれを作るために多くをオフにすることができると思います。助言がありますか？

Answer 1

あなたは...標準モジュールに

Sub TurnEverythingOff() 
With Application 
    .Calculation = xlCalculationManual 
    .EnableEvents = False 
    .DisplayAlerts = False 
    .ScreenUpdating = False 
End With 
End Sub 

Sub TurnEverythingOn() 
With Application 
    .Calculation = xlCalculationAutomatic 
    .EnableEvents = True 
    .DisplayAlerts = True 
    .ScreenUpdating = True 
End With 
End Sub 

を、次の2つのコードを持つことができます。そして、あなたが以下のようなあなたのサブ・ルーチンにそれらを呼び出すことができます...

Sub YourMacro() 
'variable declaration section 

TurnEverythingOff 
On Error GoTo Skip 'if an error occurs, this makes sure that everything is turned on back 
'other stuff here 

Skip: 
TurnEverythingOn 
End Sub 

限り条件付き書式については、未使用の範囲に適用しないでください。つまり、条件付き書式設定の行全体または列全体を参照しないでください。つまり、シート上のデータを含む範囲に制限します。