|
このみさん、こんにちは
>SQL = "SELECT MAX(給与), 氏名, 部署"
>SQL = SQL + "FROM ment.出荷実績検索情報"
>SQL = SQL + "WHERE 社員コード = :A"
>SQL = SQL + "GROUP BY 氏名, 部署"
>Set RS = CN.Execute(SQL)
ここでは文字列を連結してSQL文を作っています。
データベースの種類が不明ですが、AccessまたはSQL Serverとすると・・
SQL = "SELECT MAX(給与), 氏名, 部署 "
SQL = SQL & "FROM ment.出荷実績検索情報 "
SQL = SQL & "WHERE 社員コード = " & A & " "
SQL = SQL & "GROUP BY 氏名, 部署"
こんな感じで、変数Aを文字列と連結します。
この場合、変数Aは引数ではありませんのでご注意ください。
なお社員番号のフィールド属性が文字列の場合は以下のようにコーテーションでくくります。
SQL = SQL & "WHERE 社員コード = '" & A & "' "
#蛇足1 変数Aはわかりづらいので、意味のあるものにしたほうがいいような・・
#蛇足2 VBAでは文字列連結には & を使ったほうがいいような・・
#蛇足3 SQL文のスペースを意識しましょう・・(例では各列の最後のスペース)
|
|