質問編集履歴

3

追記

2019/09/06 08:06

投稿

kozica
kozica

スコア58

test CHANGED
File without changes
test CHANGED
@@ -25,3 +25,15 @@
25
25
  都度、全件から抽出するためにはどう変更したら良いでしょうか?
26
26
 
27
27
  今はレポートはレポートウィザードで単表形式で作成しています
28
+
29
+
30
+
31
+
32
+
33
+ 追記
34
+
35
+ 印刷ボタン押した際に印刷プレビューのタブが出て、そのタブをそのままにして再度検索して印刷ボタンを押すと
36
+
37
+ 更新されず、タブを閉じてから再度検索して印刷ボタンを押すとちゃんとできたことが確認できました。
38
+
39
+ タブをそのままで更新することは可能でしょうか?

2

修正

2019/09/06 08:05

投稿

kozica
kozica

スコア58

test CHANGED
@@ -1 +1 @@
1
- Accessでフォームの印刷ボタンからレコード検索結果を適宜レポートに埋め込んで印刷
1
+ Accessでフォームの検索結果をレポートに出力するが最初か成功しな
test CHANGED
File without changes

1

修正

2019/09/06 07:59

投稿

kozica
kozica

スコア58

test CHANGED
File without changes
test CHANGED
@@ -6,32 +6,22 @@
6
6
 
7
7
 
8
8
 
9
- 検索結果レコードを印刷するどう紐づけるかもまだわかってないですが、まずは1レコード1ページで適宜決まった
10
-
11
- レポートに埋め込み印刷する方法が知りたいです。
12
-
13
-
14
-
15
9
  現状下記のようなコードを書いてるのですが、これだと1度目はうまくいきますが、
16
10
 
17
- 2度目から1度目の結果からに絞り込むような形になってしいます
11
+ 2度目からレポートが新されせん。
18
12
 
19
13
  ```vba
20
14
 
21
15
  Private Sub print_Click()
22
16
 
23
- DoCmd.OpenReport "テストレポート", acPreview, , "ID = 15 OR ID = 16"
17
+ DoCmd.OpenReport "テストレポート", acPreview, , Me.Filter
24
18
 
25
19
  End Sub
26
20
 
27
21
  ```
28
22
 
29
- 最後の引数の抽出条件は適宜変更
30
-
31
23
 
32
24
 
33
25
  都度、全件から抽出するためにはどう変更したら良いでしょうか?
34
26
 
35
-
36
-
37
27
  今はレポートはレポートウィザードで単表形式で作成しています