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

質問編集履歴

1

FROMの前についていた「,」を削除しました。誤記です。失礼しました。

2019/08/15 06:32

投稿

退会済みユーザー
title CHANGED
File without changes
body CHANGED
@@ -15,7 +15,7 @@
15
15
 
16
16
  prov = "Provider=Microsoft.ACE.OLEDB.12.0;"
17
17
  dbpath = "Data Source=" & ThisWorkbook.Path & "\工事.accdb"
18
-   SQLstring = "SELECT ID, 工事日, 地区, 壁材, FROM MT_壁材 WHERE 地区 = '" & chiku & "'"
18
+   SQLstring = "SELECT ID, 工事日, 地区, 壁材 FROM MT_壁材 WHERE 地区 = '" & chiku & "'"
19
19
  conn.Open prov & dbpath
20
20
 
21
21
  rcds.Open SQLstring, conn
@@ -30,6 +30,6 @@
30
30
  変数のところをシングルクォーテーションで囲めばいいのでしょうが、2つめの条件を同様に作成しようとするとエラーになります。
31
31
  SQLstring の行をいろいろ " と ' の位置を変えてみたりしましたがうまくいきません。
32
32
  ↓こうなればいいのかと思うのですが、これもエラーです。
33
- SQLstring = "SELECT ID, 工事日, 地区, 壁材, FROM MT_壁材 WHERE 地区 = '" & chiku & "' And 壁材 = '" & cabe & "'"
33
+ SQLstring = "SELECT ID, 工事日, 地区, 壁材 FROM MT_壁材 WHERE 地区 = '" & chiku & "' And 壁材 = '" & cabe & "'"
34
34
 
35
35
  ひとつだけ " をいれたいのに、勝手に二つ入ってきたり(でもそれも結局エラーになったり・・・)、見る人が見れば即わかるのでしょうが、うまくいかず困っています。よろしくお願いいたします。