VBA高速化テクニック

Microsoft

入社して早2年目、最近の案件でVBAを触ることが多くなって
効率的な組み方を調べていたときに感動した話についてです。

PMOの案件で進捗管理や課題管理等の集計を行う際に、
Excelのマクロで管理するためにVBAを使っていましたが、
データが多く雑な組み方をするとかなり時間がかかってしまいました。

画面の更新をオフ

まずは、画面の更新をオフにすること

構文
―――――――――――――――――――――――――
Application.ScreenUpdating = False
―――――――――――――――――――――――――

ブックを開いてシートを変更してセルの値をコピペするという
単純なマクロでもデータが多いだけでかなり時間がかかりますが、
これを入れておくだけで格段に早くなりました。

無駄なSelect

次は、無駄なSelectをしないこと

構文
―――――――――――――――――――――――――
Sheets("Sheet1").Select
Range("A1").Select
ActiveCell.Copy
　↓
Sheets("Sheet1").Range("A1").Copy
―――――――――――――――――――――――――

セルやシートを操作する際にわざわざアクティブ化しなくても
直接指定することでこれも格段に早くなりました。
ブックでも同じなのでブックやシートの移動が激しいマクロではかなり有効です。