>>835
この2行を続けて実行
Application.DisplayAlerts = False
Application.Quit