質問編集履歴
7
情報追加
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -64,4 +64,20 @@
|
|
|
64
64
|
|
|
65
65
|
＜追記＞
|
|
66
66
|
SPY++で「レポート(R)」押下時のWM_COMMANDを確認
|
|
67
|
-
|
|
67
|
+
|
|
68
|
+
|
|
69
|
+
```VBA
|
|
70
|
+
'修正版のコード
|
|
71
|
+
Private Function prWinMerge操作()
|
|
72
|
+
|
|
73
|
+
'WinMergeのウィンドウハンドルを取得
|
|
74
|
+
Dim hWinMerge As Long
|
|
75
|
+
hWinMerge = fWinHnd_Window_Find(, "WinMergeWindowClassW")
|
|
76
|
+
If hWinMerge = 0 Then Exit Function
|
|
77
|
+
|
|
78
|
+
'「レポート(R)」を押下
|
|
79
|
+
Const wID As Long = 32868
|
|
80
|
+
Call PostMessage(hWinMerge, WM_COMMAND, wID, 0&)
|
|
81
|
+
|
|
82
|
+
End Function
|
|
83
|
+
```
|
6
情報を追加
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -60,4 +60,8 @@
|
|
|
60
60
|
|
|
61
61
|
|
|
62
62
|
End Function
|
|
63
|
-
```
|
|
63
|
+
```
|
|
64
|
+
|
|
65
|
+
＜追記＞
|
|
66
|
+
SPY++で「レポート(R)」押下時のWM_COMMANDを確認
|
|
67
|
+
|
5
脱字
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -24,6 +24,7 @@
|
|
|
24
24
|
|
|
25
25
|
どうぞ宜しくお願い致します。
|
|
26
26
|
|
|
27
|
+
＜実現イメージ＞
|
|
27
28
|
|
|
28
29
|
|
|
29
30
|
```VBA
|
4
誤字
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -22,6 +22,7 @@
|
|
|
22
22
|
|
|
23
23
|
※IAccessible では実現できない事も判明しています｡｡｡
|
|
24
24
|
|
|
25
|
+
どうぞ宜しくお願い致します。
|
|
25
26
|
|
|
26
27
|
|
|
27
28
|
|
3
誤字
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -12,7 +12,7 @@
|
|
|
12
12
|
他の作業をしているとエラーになってしまいます。
|
|
13
13
|
|
|
14
14
|
そこで、ユーザー作業の影響を受けないよう、
|
|
15
|
-
Window Message で直接操作したく、
|
|
15
|
+
Window Message 等で直接操作したく、
|
|
16
16
|
Menuのハンドルを取得し、
|
|
17
17
|
ツール(T) のIDを取得し、
|
|
18
18
|
PostMessage で WM_Command を送る等を試みたのですが、
|
2
誤字
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -1,7 +1,5 @@
|
|
|
1
1
|
ExcelVBAの修正前後で、ソースの差異を検証する為に、
|
|
2
2
|
WinMergeを使っており、一部の操作を自動化したく、
|
|
3
|
-
WinAPIを使った自動化方法を教えて頂けませんでしょうか。
|
|
4
|
-
|
|
5
3
|
現在、修正前、修正後で、各ソースをフォルダにエクスポートし、
|
|
6
4
|
WinMergeに各フォルダのパスを渡し、
|
|
7
5
|
比較結果を、Htmlレポートで出力しています。
|
|
@@ -13,7 +11,7 @@
|
|
|
13
11
|
をSendKeyで操作している為に、
|
|
14
12
|
他の作業をしているとエラーになってしまいます。
|
|
15
13
|
|
|
16
|
-
そこで、ユーザー作業の影響受けないよう、
|
|
14
|
+
そこで、ユーザー作業の影響を受けないよう、
|
|
17
15
|
Window Message で直接操作したく、
|
|
18
16
|
Menuのハンドルを取得し、
|
|
19
17
|
ツール(T) のIDを取得し、
|
1
誤字
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -1,4 +1,4 @@
|
|
|
1
|
-
|
|
1
|
+
ExcelVBAの修正前後で、ソースの差異を検証する為に、
|
|
2
2
|
WinMergeを使っており、一部の操作を自動化したく、
|
|
3
3
|
WinAPIを使った自動化方法を教えて頂けませんでしょうか。
|
|
4
4
|
|