質問編集履歴

9

更新

2020/02/27 07:31

投稿

nokonokoman
nokonokoman

スコア15

test CHANGED
File without changes
test CHANGED
@@ -132,4 +132,4 @@
132
132
 
133
133
  DBはPostgresです。
134
134
 
135
- 完成イメージ図のA,B,Cはセル結合されるものであり、Dのみ単体です。
135
+ 完成イメージ図のAの3の行はA,B,Cはセル結合されるものであり、Dのみ単体です。

8

更新

2020/02/27 07:31

投稿

nokonokoman
nokonokoman

スコア15

test CHANGED
File without changes
test CHANGED
@@ -120,4 +120,16 @@
120
120
 
121
121
  |2|111|data||
122
122
 
123
+ |3|200|aaa|AAA|
124
+
123
125
  |3|200|aaa|BBB|
126
+
127
+
128
+
129
+
130
+
131
+ 追記
132
+
133
+ DBはPostgresです。
134
+
135
+ 完成イメージ図のA,B,Cはセル結合されるものであり、Dのみ単体です。

7

追加

2020/02/27 07:30

投稿

nokonokoman
nokonokoman

スコア15

test CHANGED
File without changes
test CHANGED
@@ -86,9 +86,9 @@
86
86
 
87
87
  |:--:|--:|
88
88
 
89
- |200|aaa|
89
+ |200|AAA|
90
90
 
91
- |200|bbb|
91
+ |200|BBB|
92
92
 
93
93
 
94
94
 
@@ -120,4 +120,4 @@
120
120
 
121
121
  |2|111|data||
122
122
 
123
- |3|200|aaa|resultdata|
123
+ |3|200|aaa|BBB|

6

追加

2020/02/27 06:54

投稿

nokonokoman
nokonokoman

スコア15

test CHANGED
File without changes
test CHANGED
@@ -80,6 +80,18 @@
80
80
 
81
81
 
82
82
 
83
+ 2つ目のSELECT文実行時の取得されるデータ
84
+
85
+ |ID|result|
86
+
87
+ |:--:|--:|
88
+
89
+ |200|aaa|
90
+
91
+ |200|bbb|
92
+
93
+
94
+
83
95
 
84
96
 
85
97
  1つ目のSELECT文実行後のExcelシート

5

更新

2020/02/27 06:51

投稿

nokonokoman
nokonokoman

スコア15

test CHANGED
File without changes
test CHANGED
@@ -52,7 +52,7 @@
52
52
 
53
53
  Set myRS2 = New ADODB.Recordset
54
54
 
55
- SQL = "SELECT ID, result FROM test INNER JOIN ~~ WHERE ~~ "
55
+ SQL = "SELECT ID, RESULT FROM test INNER JOIN ~~ WHERE ~~ "
56
56
 
57
57
  myRS2.ActiveConnection = myCon
58
58
 
@@ -80,6 +80,24 @@
80
80
 
81
81
 
82
82
 
83
+
84
+
85
+ 1つ目のSELECT文実行後のExcelシート
86
+
87
+ |A|B(ID)|C(name)|
88
+
89
+ |:--|:--:|--:|
90
+
91
+ |1|100|test|
92
+
93
+ |2|111|data|
94
+
95
+ |3|200|aaa|
96
+
97
+
98
+
99
+
100
+
83
101
  完成イメージ図
84
102
 
85
103
  |A|B(ID)|C(name)|D(result)|

4

更新

2020/02/27 06:42

投稿

nokonokoman
nokonokoman

スコア15

test CHANGED
File without changes
test CHANGED
@@ -38,7 +38,7 @@
38
38
 
39
39
  ・1つ目のSQL
40
40
 
41
-
41
+ SQL = "SELECT ID, NAME FROM test INNER JOIN ~~ WHERE ~~"
42
42
 
43
43
  ~~~ExcelシートのB行にID、C行にNameの書き込みの処理~~~
44
44
 
@@ -52,7 +52,7 @@
52
52
 
53
53
  Set myRS2 = New ADODB.Recordset
54
54
 
55
- SQL = SELECT
55
+ SQL = "SELECT ID, result FROM test INNER JOIN ~~ WHERE ~~ "
56
56
 
57
57
  myRS2.ActiveConnection = myCon
58
58
 
@@ -86,8 +86,8 @@
86
86
 
87
87
  |:--|:--:|--:|
88
88
 
89
- |1|100|test| 空文字 |
89
+ |1|100|test||
90
90
 
91
- |2|111|data| 空文字 |
91
+ |2|111|data||
92
92
 
93
93
  |3|200|aaa|resultdata|

3

更新

2020/02/27 06:41

投稿

nokonokoman
nokonokoman

スコア15

test CHANGED
File without changes
test CHANGED
@@ -77,3 +77,17 @@
77
77
  恐らくB行のデータを空の行までループして値を取得→1つ目のSQLで取得しB行に表示されているIDを2つ目のSQLで取得したIDが同一かのチェックの実装→同一であれば紐づいたIDと同じ行にデータを繋げる
78
78
 
79
79
  の実装かなとは思っています。
80
+
81
+
82
+
83
+ 完成イメージ図
84
+
85
+ |A|B(ID)|C(name)|D(result)|
86
+
87
+ |:--|:--:|--:|
88
+
89
+ |1|100|test| 空文字 |
90
+
91
+ |2|111|data| 空文字 |
92
+
93
+ |3|200|aaa|resultdata|

2

追加

2020/02/27 06:38

投稿

nokonokoman
nokonokoman

スコア15

test CHANGED
File without changes
test CHANGED
@@ -74,6 +74,6 @@
74
74
 
75
75
 
76
76
 
77
- 恐らくB行のデータを空の行までループして値を取得→IDを2つ目のSQLで取得したIDが同一かのチェックの実装→同一であれば紐づいたIDと同じ行にデータを繋げる
77
+ 恐らくB行のデータを空の行までループして値を取得→1つ目のSQLで取得しB行に表示されているIDを2つ目のSQLで取得したIDが同一かのチェックの実装→同一であれば紐づいたIDと同じ行にデータを繋げる
78
78
 
79
79
  の実装かなとは思っています。

1

追加

2020/02/27 06:31

投稿

nokonokoman
nokonokoman

スコア15

test CHANGED
File without changes
test CHANGED
@@ -52,7 +52,7 @@
52
52
 
53
53
  Set myRS2 = New ADODB.Recordset
54
54
 
55
-
55
+ SQL = SELECT文
56
56
 
57
57
  myRS2.ActiveConnection = myCon
58
58