teratail header banner
teratail header banner
質問するログイン新規登録

質問編集履歴

7

とりやめのとりやめ

2019/12/13 06:10

投稿

jamada
jamada

スコア7

title CHANGED
File without changes
body CHANGED
@@ -81,11 +81,4 @@
81
81
  ?!依頼者ID
82
82
  K1001 '正常に参照できているようです
83
83
 
84
- ```---
84
+ ```---
85
-
86
-
87
- ここから自力で時間をかけてやってみることにします!
88
- 解決したら方法を記載します。
89
- 他の方法では実現できているので,ひとまず自分のできる範囲で完成させることを優先します!
90
-
91
- ありがとうございました!

6

追記2,とりやめ

2019/12/13 06:10

投稿

jamada
jamada

スコア7

title CHANGED
File without changes
body CHANGED
@@ -46,7 +46,7 @@
46
46
  伝わりますでしょうか…
47
47
  宜しくお願いします。
48
48
 
49
- ### 追記2 現在のコード
49
+ ### ~~追記2 現在のコード~~
50
50
 
51
51
  教えていただいたように下記を記述しました。
52
52
  が,「このオブジェクトに値を代入することはできません。」とエラーになってしまいました。
@@ -81,4 +81,11 @@
81
81
  ?!依頼者ID
82
82
  K1001 '正常に参照できているようです
83
83
 
84
- ```
84
+ ```---
85
+
86
+
87
+ ここから自力で時間をかけてやってみることにします!
88
+ 解決したら方法を記載します。
89
+ 他の方法では実現できているので,ひとまず自分のできる範囲で完成させることを優先します!
90
+
91
+ ありがとうございました!

5

試した結果,エラー

2019/12/13 05:59

投稿

jamada
jamada

スコア7

title CHANGED
File without changes
body CHANGED
@@ -44,4 +44,41 @@
44
44
 
45
45
 
46
46
  伝わりますでしょうか…
47
- 宜しくお願いします。
47
+ 宜しくお願いします。
48
+
49
+ ### 追記2 現在のコード
50
+
51
+ 教えていただいたように下記を記述しました。
52
+ が,「このオブジェクトに値を代入することはできません。」とエラーになってしまいました。
53
+
54
+ ```AccessVBA
55
+
56
+ Option Compare Database
57
+ Option Explicit
58
+
59
+ Private Sub Form_Open(Cancel As Integer)
60
+ With Forms!F_案件詳細
61
+ Me.txt依頼者ID = !依頼者ID
62
+ Me.txt案件名ID = !案件名ID
63
+ Me.案件ID.DefaultValue = !案件ID
64
+ Me.Filter = "案件ID=" & !案件ID '数値型の場合
65
+ Me.FilterOn = True
66
+ End With
67
+ End Sub
68
+ ```
69
+
70
+ 依頼者ID,案件名ID,はどちらのテーブルでもテキスト型。案件IDのみどちらも数値型です。
71
+ デバッグでカーソルを合わせると F_案件詳細 の依頼者IDや案件IDは参照できているようです。
72
+ 下記イミディエイトウインドウにて
73
+
74
+ ```
75
+ ?Me.txt依頼者ID = !依頼者ID
76
+ Null
77
+
78
+ ?Me.txt依頼者ID
79
+ Null
80
+
81
+ ?!依頼者ID
82
+ K1001 '正常に参照できているようです
83
+
84
+ ```

4

誤字

2019/12/13 05:45

投稿

jamada
jamada

スコア7

title CHANGED
@@ -1,1 +1,1 @@
1
- レコード抽出フォームから,一部のテキストボックスに内容を表示させた状態の別のテーブルへの入力フォームを開きたい
1
+ レコード抽出フォームから,一部のテキストボックスに内容を表示させた状態の別のテーブルへの抽出フォームを開きたい
body CHANGED
File without changes

3

質問編集

2019/12/13 05:01

投稿

jamada
jamada

スコア7

title CHANGED
@@ -1,1 +1,1 @@
1
- レコード抽出フォームから別フォームを開くとき別フォームの一部のテキストボックスにのみ内容を反映させたい
1
+ レコード抽出フォームから,一部のテキストボックスに内容を表示させた状態の別のテーブルへの入力フォームを開きた
body CHANGED
@@ -1,8 +1,10 @@
1
1
  いつも回答いただきましてありがとうございます。
2
2
  またつまづいてしまったので質問させてください。
3
3
 
4
- 抽出されたレコードの,あるフィールドを,テーブルが元になる別フォームの特定のテキストボックスに反映させたいのですが,可能でしょうか。
4
+ Aのテーブルから抽出されたレコードA-1の,あるフィールドを,Bテーブルが元になる別フォームの特定のテキストボックスに反映させたいのですが,可能でしょうか。
5
5
 
6
+ また,AテーブルとBテーブルにはリレーションシップが設定されていますが,抽出されたレコード情報A-1を基に,別フォームにはレコードを抽出できますでしょうか。
7
+
6
8
  別フォームのすべてのテキストボックスに反映させようとしてしまう方法しか見つからず……
7
9
  お手数をかけますが方法をご教示いただけますでしょうか。
8
10
 

2

質問追記

2019/12/13 05:00

投稿

jamada
jamada

スコア7

title CHANGED
File without changes
body CHANGED
@@ -19,4 +19,27 @@
19
19
  ###
20
20
 
21
21
  情報が不足しているようであればお教えください。
22
- 何卒宜しくお願いいたします。
22
+ 何卒宜しくお願いいたします。
23
+
24
+ ### 追記
25
+ 作成したクエリです。
26
+ 下記クエリで確かに依頼者・案件名はでました。ありがとうございます。
27
+ ```SQL
28
+ SELECT T_行動履歴.行動ID連番, T_行動履歴.行動ID, T_行動履歴.日付,T_行動履歴.開始時間, T_行動履歴.終了時間, T_行動履歴.記録者, T_行動履歴.行動種別, T_行動履歴.内容, T_行動履歴.案件ID, T_案件.依頼者ID, T_案件.案件名ID,
29
+ FROM T_案件 RIGHT JOIN T_行動履歴 ON T_案件.[案件ID] = T_行動履歴.[案件ID];
30
+ ```
31
+ ただ,もうしわけありません,やりたいことの言葉がたりていない質問をしてしまいました。
32
+
33
+ ◆T_案件 から抽出したレコードと紐づいた依頼者・案件名を F_行動履歴 ヘッダーに表示する
34
+ かつ
35
+ ◆**F_行動履歴 詳細には T_案件 で抽出したレコード(案件ID)に紐づいた行動履歴のレコードを抽出したい(新規レコードの追加もしたい)**
36
+
37
+ のでした。言葉足らずで申し訳ありません。
38
+
39
+ 例)
40
+ T_案件 から案件IDが「1」のレコードを抽出して,その状態で F_行動履歴 を開くと
41
+ ヘッダーに依頼者・案件名が表示され,詳細にはあらかじめ案件ID「1」が入力された状態のT_行動履歴の帳票レコードがフォームで表示されている
42
+
43
+
44
+ 伝わりますでしょうか…
45
+ 宜しくお願いします。

1

タイトル

2019/12/13 04:46

投稿

jamada
jamada

スコア7

title CHANGED
@@ -1,1 +1,1 @@
1
- レコード抽出フォームから別フォームを開くとき,抽出した内容の一部のみ別フォームに反映させたい
1
+ レコード抽出フォームから別フォームを開くとき,別フォームの一部のテキストボックスのみ内容を反映させたい
body CHANGED
File without changes