>xlApp.Visible = Falseの場合、この表示さえなく行うことができるので別アプリで行っておりました。 >自アプリ上では、この処理は無理なのでしょうか。 No.1の回答の2の方法で可能ですが、1つ問題があります。 新規のアプリケーションは、ファイルからTEST.xlsを開くため、 未保存のデータは反映されません。 予めTEST.xlsを保存しておく必要があります。 Sub test2() Dim xlApp As Excel.Application Dim xlBook As Excel.Workbook Application.ScreenUpdating = False Application.DisplayAlerts = False Set xlApp = CreateObject("Excel.Application") '非表示・画面更新無・アラート非表示 xlA