回答編集履歴

1

コードの修正版を追記

2019/06/04 06:47

投稿

hatena19
hatena19

スコア33740

test CHANGED
@@ -19,3 +19,23 @@
19
19
  "SET F_CustomerName = Text_CustomerName, F_Address = Text_Address"
20
20
 
21
21
  ```
22
+
23
+
24
+
25
+ ---
26
+
27
+ saziさんとかぶった。
28
+
29
+ しかも、Text_CustomerName と Text_Address は名前から推測するに、フィールド名ではなくテキストボックス名の可能性が高い。ということで、saziさんと同じだか、下記に修正
30
+
31
+
32
+
33
+ ```VBA
34
+
35
+ SQL = "UPDATE T_Customer AS T INNER JOIN T_WCustomer AS W " & _
36
+
37
+ "ON T.F_CustomerCode = W.F_CustomerCode " & _
38
+
39
+ "SET T.F_CustomerName = W.F_CustomerName, T.F_Address = W.F_Address"
40
+
41
+ ```