Excelでワークシート再計算を実行中にマウス操作をすると、再計算がリセットされ表示が中途半端になることがある。
再計算中は操作を受け付けないようにすることで、この事象を回避できる。なお、再計算をマクロで実行する場合、Application.Calculateで実行するとマルチコアで実行が可能。
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 |
Option Explicit Sub 再計算() If vbNo = MsgBox("再計算しますか？", vbYesNo + vbInformation, ThisWorkbook.Name) Then Exit Sub Application.Interactive = False Application.Calculate Application.Interactive = True MsgBox "再計算完了", vbOKOnly + vbInformation, ThisWorkbook.Name End Sub |