Excel VBA 質問スレ Part61

[334 デフォルトの名無しさん (ﾜｯﾁｮｲ bf68-dCWx) 2019/05/24(金) 09:59:52.88 ID:RAYiE+wA0]

>>330
2019で試したけど落ちなかった
＞　Application.Wait([Now() + "00:00:01"])
これを抜いても同じ

カンで答えると、再計算が邪魔してるような気がする

・一度再計算や描画、イベントを切ってみてはどうかな
Application.EnableEvents = False
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual

・あとはこの部分のウェイトをもう少し長くする
＞Application.Wait([Now() + "00:00:01"])

・まっさらなブックで試してみる