Application
全B00K中一つのみのオブジェクト
プロパティ一覧
DisplayAlerts
DefaultはTrue, Falseにすることでシート削除時の「削除しますか?」といったダイアログを
非表示にすることができる。(マクロでダイアログを操作する手間を省ける。)
ScreenUpdating
DefaltはTrue、Falseにすることでマクロ実行中の画面更新を止める。(実行速度の向上)
StatusBar
文字列をBookの左下に表示することができる。
コード例
Application.DisplayAlerts = False
Application.ScreenUpdating = False
Application.StatusBar = "処理開始"
With ThisWorkbook
.Worksheets.Add after:=.Worksheets(Worksheets.Count)
Worksheets(Worksheets.Count).Delete
End With
Application.StatusBar = "処理完了"
Application.DisplayAlerts = True
Application.ScreenUpdating = True
Application.StatusBar = ""
WorkSheetFunction
SumやCountIfなど非VBA関数が使用できるようになる。
With WorksheetFunction
If .Sum(r.Offset(, 1).Resize(, 5)) >= 350 And _
.CountIf(r.Offset(, 1).Resize(, 5), ">=50") = 5