|
SQLで今困っています。
セルの(1,1)にある文字列をキーにして
データベースからキー項目から他の項目のデータを抽出するのですが
Dim SQL As String
Dim RS As ADODB.Recordset
Dim R_Idx As Range
Dim A As String
Set CN = New ADODB.Connection
CN.CommandTimeout = 300
Selection.ClearContents
CN.Open strCN
A = Cells(1,1) //Aには社員番号が入っています
SQL = "SELECT MAX(給与), 氏名, 部署"
SQL = SQL + "FROM ment.出荷実績検索情報"
SQL = SQL + "WHERE 社員コード = :A"
SQL = SQL + "GROUP BY 氏名, 部署"
Set RS = CN.Execute(SQL)
という具合に書いているのですが、
「:」が不正ですと言われてしまうのですがなぜなんでしょうか?
引数を使用するには「:」を使用しますよね?
よくわからないのでご教授お願いします
|
|