主キーが設定されていて、主キーから、何かを検索するのは、カンタンです。
しかし、重複しているキーから、一意の値を探すには、どうするのでしょうか？
こんな疑問を解決します。
目次
主キーなんて関係ねぇ！DAOを利用する
こんにちは。伊川(@naonaoke)です。
散々、主キーは、大切と言っておきながら、主キーなんで関係ないと言っていいものかと思っています。
すべて、クライアントの無茶から始まっています。
もう少し、要領がいい方法はなのかと思いながら、作成しました。
悲しいサラリーマンの性ですね。
では、紹介していきます。
このブログはこんな人にお勧め
- DAOを、勉強している人
- ACCESSでFor～Nextのループを利用したことがない人
- クライアントの無茶振りに困っている人
このブログを、読み終わるころには・・・・
ACCESSを操作するには、必要な知識です。
ループも含めましたので、是非参考にしてください。
DAOで検索する
ACCESSは、行に対しては、検索、抽出は、割とカンタンにでます。
しかし、列に対して、何らかのアクションをするには、結構、難しいと思います。
その列に対してのアクションを可能にするのが、DAOだと思っています。
今回紹介するコードに関しては、逆引辞典を参考にしました。
しかし、逆引辞典も、いきなり、利用できるわけではないので、ある程度、VBAを理解していないと利用できませんね。
なので、わかりやすく紹介したいと思います。
DAOで検索する 作業手順 その1 データベースを確認する。
今回、図のようなデータベースがあり、親IDが、A001と、B001です。
A001に紐づく値をすべて、フォーム上に表示するという内容です。
DAOで検索する 作業手順 その2 フォームを作成する。
今回作成するフォームは、すべて、非連結のテキストボックスで構成しています。
親IDは、txtテキスト_1～txtテキスト_5
子IDは、txt子テキスト_1～txt子テキスト_5
商品名は、txt商品名_1～txt商品名_5
このように名前を、付けました。
DAOで検索する 作業手順 その3 今回作成したコード
A001の親IDで検索して、カウントアップで書き出します。
紹介しているコードと、逆引辞典のコードは、似ていませんが、この理屈だと思いました。
なので、上記のコードで作動しました。
DAOで検索する 作業手順 その4 クライアントが無茶を言ってきた
フォームに表示した内容を、メールで送ってほしいとのことです。
Excelで添付したほうがいいのではと思いましたが、メールのテンプレートなどもすでに用意されています。
なんということか？
なので、テキストボックスの内容を書き出しました。
これも、考えてもわからなかったので、教えてもらいました。
自分でよく利用しているコードなのですが、理屈がわかりました。
ここの理屈を紹介すると長くなるので、割愛します。
DAOで検索する 作業手順 その5 まだ終わらない、メール送信
ACCESSから、Outlookを操作するには、Microsoft Outlook 16.0 Object Libraryにチェックを入れる必要があります。
めでたく終わりました。
ここがポイント
ACCESSで、逆引辞典を利用したのは、初めてでした。このような内容は、ネットで、調べても、なかなかHITしないので、参考にしていただければと思います。今回のポイントは、手動で操作をしていないということです。つまり、親IDの入力以外は、すべて、クリックのみで完結しています。これが、ヒューマンエラーを出さない秘訣です。
まとめ
今回は、DAOの紹介でした。
何度かDAOは、動画ブログで紹介していますので、是日、皆さんのスキルにしてください。
今回のサンプルファイルは、No310です。
わからない事を延々と考えるのは、無駄です。
- なんで作動かないの？
- もうやだ！VBAなんか嫌い！
- ネットで調べても情報がない！
必ず作動するコードが、ここにあります。
