質問編集履歴

7

情報追加

2019/04/04 00:30

投稿

ExcelVBAer
ExcelVBAer

score1173

test CHANGED
File without changes
test CHANGED
@@ -131,3 +131,35 @@
131
131
  SPY++で「レポート(R)」押下時のWM_COMMANDを確認
132
132
 
133
133
  ![イメージ説明](564ca8b62fd50ee72cb3e31f4e711419.png)
134
+
135
+
136
+
137
+ ```VBA
138
+
139
+ '修正版のコード
140
+
141
+ Private Function prWinMerge操作()
142
+
143
+
144
+
145
+ 'WinMergeのウィンドウハンドルを取得
146
+
147
+ Dim hWinMerge As Long
148
+
149
+ hWinMerge = fWinHnd_Window_Find(, "WinMergeWindowClassW")
150
+
151
+ If hWinMerge = 0 Then Exit Function
152
+
153
+
154
+
155
+ '「レポート(R)」を押下
156
+
157
+ Const wID As Long = 32868
158
+
159
+ Call PostMessage(hWinMerge, WM_COMMAND, wID, 0&)
160
+
161
+
162
+
163
+ End Function
164
+
165
+ ```

6

情報を追加

2019/04/04 00:30

投稿

ExcelVBAer
ExcelVBAer

score1173

test CHANGED
File without changes
test CHANGED
@@ -123,3 +123,11 @@
123
123
  End Function
124
124
 
125
125
  ```
126
+
127
+
128
+
129
+ <追記>
130
+
131
+ SPY++で「レポート(R)」押下時のWM_COMMANDを確認
132
+
133
+ ![イメージ説明](564ca8b62fd50ee72cb3e31f4e711419.png)

5

脱字

2019/04/04 00:18

投稿

ExcelVBAer
ExcelVBAer

score1173

test CHANGED
File without changes
test CHANGED
@@ -49,6 +49,8 @@
49
49
  どうぞ宜しくお願い致します。
50
50
 
51
51
 
52
+
53
+ <実現イメージ>
52
54
 
53
55
  ![イメージ説明](ace04e90a87df669396f4ebc19dc449e.png)
54
56
 

4

誤字

2019/04/03 08:55

投稿

ExcelVBAer
ExcelVBAer

score1173

test CHANGED
File without changes
test CHANGED
@@ -45,6 +45,8 @@
45
45
  ※IAccessible では実現できない事も判明しています。。。
46
46
 
47
47
 
48
+
49
+ どうぞ宜しくお願い致します。
48
50
 
49
51
 
50
52
 

3

誤字

2019/04/03 08:54

投稿

ExcelVBAer
ExcelVBAer

score1173

test CHANGED
File without changes
test CHANGED
@@ -26,7 +26,7 @@
26
26
 
27
27
  そこで、ユーザー作業の影響を受けないよう、
28
28
 
29
- Window Message で直接操作したく、
29
+ Window Message で直接操作したく、
30
30
 
31
31
  Menuのハンドルを取得し、
32
32
 

2

誤字

2019/04/03 08:52

投稿

ExcelVBAer
ExcelVBAer

score1173

test CHANGED
File without changes
test CHANGED
@@ -1,10 +1,6 @@
1
1
  ExcelVBAの修正前後で、ソースの差異を検証する為に、
2
2
 
3
3
  WinMergeを使っており、一部の操作を自動化したく、
4
-
5
- WinAPIを使った自動化方法を教えて頂けませんでしょうか。
6
-
7
-
8
4
 
9
5
  現在、修正前、修正後で、各ソースをフォルダにエクスポートし、
10
6
 
@@ -28,7 +24,7 @@
28
24
 
29
25
 
30
26
 
31
- そこで、ユーザー作業の影響受けないよう、
27
+ そこで、ユーザー作業の影響受けないよう、
32
28
 
33
29
  Window Message で直接操作したく、
34
30
 

1

誤字

2019/04/03 08:52

投稿

ExcelVBAer
ExcelVBAer

score1173

test CHANGED
File without changes
test CHANGED
@@ -1,4 +1,4 @@
1
- xcelVBAの修正前後で、ソースの差異を検証する為に、
1
+ ExcelVBAの修正前後で、ソースの差異を検証する為に、
2
2
 
3
3
  WinMergeを使っており、一部の操作を自動化したく、
4
4