質問編集履歴
1
「※最終的に実現」したい事を追記しました。
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -29,8 +29,8 @@
|
|
|
29
29
|
|
|
30
30
|
以下も同様にデバッグは起きませんが、BATファイルの起動はされないようです。
|
|
31
31
|
|
|
32
|
-
'
|
|
32
|
+
' ---------------------------------------------------------------------------------
|
|
33
|
-
'
|
|
33
|
+
' ●案1
|
|
34
34
|
' Dim bookPath As String
|
|
35
35
|
' Dim batchPath As String
|
|
36
36
|
' Dim wsh As Object
|
|
@@ -45,8 +45,7 @@
|
|
|
45
45
|
' '後片付け
|
|
46
46
|
' Set wsh = Nothing
|
|
47
47
|
|
|
48
|
-
'
|
|
48
|
+
' ---------------------------------------------------------------------------------
|
|
49
|
-
|
|
50
49
|
' ●案2
|
|
51
50
|
' Dim procId As Double
|
|
52
51
|
' Dim sPath
|
|
@@ -56,6 +55,7 @@
|
|
|
56
55
|
'
|
|
57
56
|
' procId = Shell(sPath)
|
|
58
57
|
|
|
58
|
+
' ---------------------------------------------------------------------------------
|
|
59
59
|
' ●案3
|
|
60
60
|
' Dim sPath
|
|
61
61
|
' Dim procId As Long 'プロセスID
|
|
@@ -77,5 +77,14 @@
|
|
|
77
77
|
|
|
78
78
|
### 補足情報（FW/ツールのバージョンなど）
|
|
79
79
|
|
|
80
|
-
Excel 2016 64Bitになります。
|
|
80
|
+
Excel 2016 64Bitになります。
|
|
81
|
-
OpenProcessの宣言等はしていますので、デバッグは発生しません。
|
|
81
|
+
OpenProcessの宣言等はしていますので、デバッグは発生しません。
|
|
82
|
+
|
|
83
|
+
### ※最終的に実現したい事
|
|
84
|
+
|
|
85
|
+
最終的には、フォルダ内にある複数のテキストファイルをエクセルに一括インポートしたい。
|
|
86
|
+
|
|
87
|
+
①BATファイルでをテキストファイルを一つのファイルにマージ
|
|
88
|
+
→BATファイル単体では起動可、この工程をVBAで起動したい
|
|
89
|
+
必要であれば、作成が終わるまでの待ち時間も加味したい
|
|
90
|
+
②①をSendkeys等でコピペし、Excelに貼付
|