文字条件に合うレコードを抽出する｜Access SQL

SELECT FROM WHERE ：文字列で抽出する場合、'(単引用符)で囲みます

Access VBAでSQLを実行するコードを掲載しています。サンプルソフトもダウンロードできます。

例.　SELECT 名前 FROM 学生名簿 WHERE 苗字='大木'
苗字が「大木」の名前をレコードセットに取り出します。
文字列の場合、'(単引用符)で囲みます。

Home　

SQL Tips

実行サンプルソフト

［実行時の画面］
型式を入力し「抽出」ボタンをクリックすると、商品カタログから見つかれば「商品名」「価格」を表示します。
見つからなければ、メッセージを表示します。
商品検索結果

［商品カタログ　テーブル］
商品ID　商品名　型式　価格
10　液晶TV 20型　ETV-20D　\78,000
11　液晶TV 26型　ETV-26D　\98,000
13　液晶TV 32型　ETV-32D　\2,600,000
16　液晶TV 37型　ETV-37D　\3,500,000
商品カタログテーブル

SQLを実行するAccess VBA

Option Compare Database

Private Sub コマンド8_Click()
    Dim SQL As String
    Dim rs As Recordset
    If IsNull(Me!テキスト1) Then
        MsgBox "抽出する「型式」を入力してください"
        Exit Sub
    End If
    Me!テキスト2 = Null
    SQL = "SELECT 商品名,価格 FROM 商品カタログ WHERE 型式= '" & Me!テキスト1 & "'"
    Set rs = CurrentDb.OpenRecordset(SQL)
    If Not rs.EOF Then
        Me!テキスト2 = rs![商品名]
        Me!テキスト3 = rs![価格]
    Else
        MsgBox "入力された型式の商品は見つかりません。"
    End If
    Set rs = Nothing
End Sub

サンプルソフトのダウンロード