t-hom’s diary

マクロが遅い原因は、だいたいループにある。以下のようなマクロを実行すると、私の環境ではだいたい5秒くらいかかった。 Sub サンプルマクロ() For i = 1 To 9999 Sheets(1).Cells(1, 1).Value = i Next For j = 1 To 9999 合計 = 合計 + j Sheets(1).Cells(1, 2).Value = 合計 Next For k = 1 To 9999 DoEvents Next End…