回答編集履歴
1
コード追記
test
CHANGED
@@ -21,3 +21,13 @@
|
|
21
21
|
抽出条件を設定したいなら、クエリを書き換えなくてもFilterプロパティを使えばいいと思いますが。
|
22
22
|
|
23
23
|
クエリを書き換えてしまうと、後で元に戻す必要があったり、すでにWhere句やOrder By句があったりすると面倒だと思いますが。
|
24
|
+
|
25
|
+
|
26
|
+
|
27
|
+
```vba
|
28
|
+
|
29
|
+
Me.Filter = "LOTNO = 444"
|
30
|
+
|
31
|
+
Me.FilterOn = True
|
32
|
+
|
33
|
+
```
|