Access IIf関数 フォームとの連携 チェックボックスの有無で抽出条件設定

ある、販売データから、抽出条件を単選択したり、複数選択したりしたい場合があるとします。 クエリで毎回、抽出条件を書き直すのは面倒なので、フォームのチェックボックスを使用して表したいと思います。 例として、以下のテーブル SupermarketReceiptでフィールドpos_large_class_nameの種類に応じて抽出条件を変えたい場合、まずフォームにそれぞれの種類のチェックボックスを作成します。 フォームチェックボックスのプロパティの名前はpos_large_

Access　InStr関数の活用　1フィールドに、複数の値が入っていて値を集計した場合

１フィールドに複数の値が入っているテーブルの値の集計をしたい場合、選択クエリで Instr関数を使用して分けた後に集計選択クエリで集計をすることができます。 関数式はSwitch関数も組み合わせて以下のように記述します。 Switch(InStr([テーブル名]![フィールド名],値)>0,任意の値) 例えば、テーブルAのフィールド「値」に　abcdeの5文字が様々な組み合わせで入っている表があるとします。 テーブルAにabcdeが何個ずつあるか知りたい時、値にaがあ

12/15（水）19:30〜 メンバーズデータアドベンチャー✖️メンバーズユーエックスカンパニーでデータ分析やUXに関わる知見をシェアし合うLT会行います！ In. Data × UX Lightning Talks #3 https://dataadventure.connpass.com/event/231240/ #Indu

Access 日付から用途に応じた新たな日付を設定するクエリ関数

データ取得の日時を限定する場面が出てきた時のクエリ関数の設定をご紹介します。 例として、化粧品のECサイトに会員登録をした会員に２か月後にサンプル配送を行う場合があるかと思います。 その顧客データをどう抽出したら良いかは、会員登録の日付を元に設定します。 【元テーブル】 更新クエリで　”サンプル送付日”フィールドに　 DateAdd(引数単位,時間,日時) 関数を使い、日付を入れていきます。 単純に２か月後なら　DateAdd("m",２,[会員登録日])　と　レコ

Access Filedialogの実行時エラー'-2147467259（8000405）'

AccessVBAでFiledialogオブジェクトを実装し、いざ実行しても、 Filedialogの実行時エラー'-2147467259（8000405）' と出てきて、Filedialogが使えない時があります。 構文は間違えていないか、ということを確認したら、以下の設定を行ってください。 VBEを開き、ツール→参照設定 Microsoft Office 16.0 Object Library　をチェックし、OK ※数字はバージョンにより変わります これでFil

Access　インポートするファイル名の一部をレコードとして取り込む

インポートするレコードがいつ作成されたものなのか、後々の分析作業で使用したい場面で使います。 ファイル名の最後に年月日（yyyymmdd）と文字列が入っている場合AccessのVBAにもSQLを使用したモジュール入れて、レコードにすることが可能です。 この場合は　Right(ファイル名, 8)　で取り出します。 ファイル名は文字列なので、'で括ります。 後、フィールド名がNullの場合も考慮しNz関数を使用します。 AccessのVBAでSQLを起動する時はDoCmd.

Access Switch関数とIIf関数

レコード値を変換させるときに良くSwitch関数かIIf関数を使用します。 Switch関数は条件式の値が真（True）の場合、交換値と該当しない（False）場合はNull値となります。 Switch(条件式1,交換値1,条件式2,交換値2,条件式3,交換値3,…） IIf関数も式の値が真（True）の場合と該当しない（False）場合の値も設定できます。 IIf(条件式,真の場合,偽の場合） 複数設定↓↓ IIf(条件式1,真の場合1, IIf(条件式2,真の場合

Accessエラー　循環参照

クエリをデータビュー形式にしようとすると以下のようなエラーが出ました。 ⚠️クエリ定義のSELECTで指定されている別名 '品目例' が循環参照を発生させています。 このような時はクエリをデザインビュー形式のまま、フィールドグリッドで下の別名と、別名を指定する時の関数内に元フィールドを使用していないか確認をします。 上の画像の例では別名「品目例」（水色）フィールドを作成するのに元フィールド「品目例」（黄色）を使用しています。 このようになっていたら、別名「品目例」を「

Access VBA エクスポートフォルダの選択

Accessからテーブルデータやクエリをエクスポートする時に、エクスポート場所を考える時があります。 １．現在起動しているデータベースと同じフォルダにエクスポートする 現在起動しているデータベースと同じフォルダの場合は CurrentProject.Pathのコードで指定します。 ※CurrentProjectオブジェクトド ※object.Pathメソッド Private Sub Sample export() Dim FLPath As String:

実行時エラー ’3011’

Access VBAでテーブルやクエリのエクスポートを実行した時、タイトルのエラーが出ました。 ※例はテキストエクスポート 実行時エラー ’3011’ オブジェクト ’オブジェクト名#txt’ が見つかりませんでした。オブジェクトが存在していること、名前やパス名が正しいことを確認してください。 ’オブジェクト名#txt’ がローカルオブジェクトでない場合は、ネットワークの接続を確認するか、サーバー管理者に問い合わせてください。 テキストエクスポートのコードを確認しました

ランダム抽出を〇〇件

業務でランダムに〇〇件、定期的に抽出したい。 そんなオファーをいただきました。 Accessでランダムに〇〇件抽出するときは、どうしたら良いでしょうか？ １．ランダムに並べ替えまず、VBAを開き、標準モジュールに以下のコードを書きます Public Function test_Randomize() RandomizeEnd Function​ ※コード説明 ・Randomize・・・乱数系列初期化 下地はこれで完成。 Randomizeステートメントを入れ

自己紹介

2020年、転職を機にデータエンジニア／データアナリストの職となりました。 今はAccessの中心としたデータベース開発を行っています。 Accessのこと、業務の中で気が付いたAccessのTipsをまとめていこうと思っていますので、どうぞよろしくお願いします。 yuki