回答編集履歴
1
ちょい訂正
answer
CHANGED
|
@@ -25,9 +25,11 @@
|
|
|
25
25
|
With CreateObject("Excel.Application")
|
|
26
26
|
|
|
27
27
|
'処理
|
|
28
|
+
|
|
28
29
|
With .Workbooks.Open(str1, False, True)
|
|
30
|
+
|
|
31
|
+
'処理
|
|
29
32
|
|
|
30
|
-
|
|
31
33
|
.Close False
|
|
32
34
|
End With
|
|
33
35
|
|
|
@@ -38,6 +40,8 @@
|
|
|
38
40
|
End Sub
|
|
39
41
|
```
|
|
40
42
|
|
|
43
|
+
### P.S.
|
|
44
|
+
|
|
41
45
|
> End with の次に「Excel.Application.Quit」を入れて試しましたが、消えませんでした。
|
|
42
46
|
|
|
43
47
|
もしかしたら保存確認メッセージが邪魔してたりして？
|