回答編集履歴
2
ページアップ、ページダウンから、矢印に変更
test
CHANGED
@@ -12,11 +12,11 @@
|
|
12
12
|
|
13
13
|
If (Count < 0) Then
|
14
14
|
|
15
|
-
SendKeys "{
|
15
|
+
SendKeys "{UP}"
|
16
16
|
|
17
17
|
ElseIf (Count > 0) Then
|
18
18
|
|
19
|
-
SendKeys "{
|
19
|
+
SendKeys "{DOWN}"
|
20
20
|
|
21
21
|
End If
|
22
22
|
|
1
コードを見やすくしました。
test
CHANGED
@@ -3,6 +3,8 @@
|
|
3
3
|
結局、レポートに以下のコードを挿入することで解決しました。
|
4
4
|
|
5
5
|
|
6
|
+
|
7
|
+
```ここに言語を入力
|
6
8
|
|
7
9
|
Private Sub Report_MouseWheel(ByVal Page As Boolean, ByVal Count As Long)
|
8
10
|
|
@@ -23,3 +25,5 @@
|
|
23
25
|
End If
|
24
26
|
|
25
27
|
End Sub
|
28
|
+
|
29
|
+
```
|