質問編集履歴
1
Set wb = objExcel.Workbooks.Openに修正
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -26,7 +26,7 @@
|
|
|
26
26
|
|
|
27
27
|
Set objExcel = CreateObject("Excel.Application")
|
|
28
28
|
|
|
29
|
-
Set wb = Workbooks.Open(tgtPath, Password:=vbNullString)
|
|
29
|
+
Set wb = objExcel.Workbooks.Open(tgtPath, Password:=vbNullString)
|
|
30
30
|
|
|
31
31
|
|
|
32
32
|
|