
お世話になっております。
よろしくお願いいたします。
この質問はhttps://teratail.com/questions/qjr86kdum11acy
の続きといいますか、問題個所の焦点が絞られてきましたので、再度質問させていただきます。
もしかしたら、ルール違反かもしれませんが、よろしくお願いいたします。
タスクスケジューラについての質問です。
タスクスケジューラでExcelファイルへ変更を加えるACCESSを自動実行したいです。
しかしながら、タスクスケジューラは実行して、対象のACCESSは動くのですが、
Excelファイルを開くコードのところで止まってしまい、
いつまでたってもタスクスケジューラは実行中のままです。
もちろん、問題のコードがあっても、タスクスケジューラを使わなければ、
きちんと機能し、正常終了します。
こちらのコードです。
Set Excel = CreateObject("Excel.Application.16")'16は入れても、入れなくても一緒でした
Excel.Visible = True '表示
↓このコードです。
Set wb = Excel.Workbooks.Open("C:\エクセルファイル.xlsm") 'excelファイルを開く
この問題のコードの前にExit Functionを入れると、その通りに動き、正常終了します。
このコードの後にExit Functionを入れると、タスクスケジューラは実行中のままになってしまいます。
タスクスケジューラの設定は以下の通りです。
全般タブ
セキュリティオプション
ユーザアカウント
administrator
ユーザーがログオンしているかどうかにかかわらず実行する
最上位の特権で実行する
構成
Windows10
です。
どうしたらよいでしょうか?
0 コメント