Application.ScreenUpdating = False Application.DisplayStatusBar = False Application.Calculation = xlCalculationManual Application.EnableEvents = False Application.ScreenUpdating = True Application.DisplayStatusBar = True Application.Calculation = xlCalculationAutomatic Application.EnableEvents = True 열려 있는 모든 통합 문서 Application.Calculate (또는 Calculate) 특정 워크시트 Worksheets(1).Calculate 특정 범위 Worksheets(1).Rows(2).Calculate Worksheets(""Sheet1"").UsedRange.Columns(""A:C"").Calculate range("A1").FormulaR1C1 = "=TODAY()" Range("F2") = Evaluate("SUM((B2:B60001=E2)*C2:C60001)")