質問編集履歴
2
状況の解説付与
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -2,6 +2,9 @@
|
|
|
2
2
|
通常起動(Accessからモジュール実行）では使用できるのですが、
|
|
3
3
|
タスクスケジューラで「ユーザーがログオンしているかどうかに関わらず実行する」-「最上位の特権で実行する」だと Set xlapp = CreateObject("Excel.Application")で失敗します。
|
|
4
4
|
※ログオンしているときのみ実行だと正常動作
|
|
5
|
+
※ユーザは管理者権限をもっています
|
|
6
|
+
※テキストファイルにログを出力し、下記で止まっていることを確認済。
|
|
7
|
+
Set xlapp = CreateObject("Excel.Application.16")
|
|
5
8
|
|
|
6
9
|
回避策を知りたいのですが、ご教授いただけますでしょうか。
|
|
7
10
|
よろしくお願いいたします。
|
1
不必要なコードの削除
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -19,8 +19,7 @@
|
|
|
19
19
|
wbook = "Excelファイル名.xlsx"
|
|
20
20
|
wbook = path & wbook
|
|
21
21
|
|
|
22
|
-
sheetName = Month(SerchStartDate) & "月"
|
|
23
|
-
'ﾃﾝﾌﾟﾚｰﾄﾌｧｲﾙｵｰﾌﾟﾝ
|
|
22
|
+
'ﾃﾝﾌﾟﾚｰﾄﾌｧｲﾙｵｰﾌﾟﾝ
|
|
24
23
|
xlapp.Workbooks.Open (wbook) ←エラー
|
|
25
24
|
|
|
26
25
|
xlapp.Application.DisplayAlerts = False
|