クエリでテーブルをフォームのコンボボックスから変更

Question

しばらくぶりです。

よろしくお願いいたします。

テーブル：テーブルはエクセルから追加します。

　テーブル名は、エクセルの名前

　月ごとに増えていく予定です。

　例：２０２４０６

　　　２０２４０７など

　コンボ用テーブル

　　２０２４０６

　　２０２４０７

　　など　追加時に自動で更新され増えていきます。

フォーム

　設定フォーム

　　コンボ用テーブルをコンボボックス（コンボ一覧）にします。

クエリ

　フォーム内にコンボ一覧を作成（コンボ用テーブル）

　　月例クエリ内に

　　　　[Forms]![設定フォーム]![コンボ一覧]　を　用意し、２０２４０６を選んでから

　クエリを開くと、例：２０２４０６のテーブル内容をクエリで表示、抽出など出来るとありがたいです。

※フォーム内での変更は、

Private Sub コンボ1_Click()
Me.サブフォーム.Form.RecordSource = [Forms]![入力フォーム]![コンボ1]
End Sub

でうまくいきました。
クエリでの実現は可能でしょうか。

どぞよろしくお願いいたします。

Answer 1

> テーブルはエクセルから追加します。

任意の Excel ブック上の任意のワークシート（または名前付きセル範囲）を
Access データベース上のテーブルとしてインポートする、という意味であるとして、

https://tasukete-access.com/2023/05/01/accessdev_excel_inport/

を参考にしました。

> テーブル名は、エクセルの名前> 月ごとに増えていく予定です。

>それらのテーブルの構造は全く同一なのでしょうか。
>それともテーブルごとに構造が異なるのでしょうか。
全て構造は一緒です。

> 例：２０２４０６> 　　２０２４０７など
>また、上記のような[年月]（あるいは日付）を表す値が格納されている列は
>インポート元であるワークシート上には存在しているのでしょうか。
>それとも、ワークシートの名前からしか[年月]を取得できないのでしょうか。
年月としましたが年月ある数値文字になる予定です。

> 月例クエリ内に> [Forms]![設定フォーム]![コンボ一覧]　を　用意し、２０２４０６を選んでから> クエリを開くと、例：２０２４０６のテーブル内容をクエリで表示、抽出など出来るとありがたい

>少なくとも、年月ごとにテーブルが分割されている状況では、
>クエリの機能のみによって上記のような操作を実行することは不可能です。

>現時点ではワークシートをインポートする流れ自体に問題があると思いますので、
>まずはその辺りから見直されることをお奨めします。

一つのブック、テーブルの行数が、１０００を超えています。

クエリのテーブルの変更を簡単におこないたいだけなんですが。

よろしくお願いいたします。

Answer 2

> テーブルはエクセルから追加します。

任意の Excel ブック上の任意のワークシート（または名前付きセル範囲）を
Access データベース上のテーブルとしてインポートする、という意味であるとして、

> テーブル名は、エクセルの名前> 月ごとに増えていく予定です。

それらのテーブルの構造は全く同一なのでしょうか。
それともテーブルごとに構造が異なるのでしょうか。

もし前者に該当するのであれば、新規テーブルとして別々にインポートするのではなく、
同一構造の既存のテーブルに対してワークシートのインポートを行ない、
全てのワークシートのレコードを 1 つのテーブルに統合する形を取られた方がよいでしょう。

> 例：２０２４０６> 　　２０２４０７など

また、上記のような[年月]（あるいは日付）を表す値が格納されている列は
インポート元であるワークシート上には存在しているのでしょうか。
それとも、ワークシートの名前からしか[年月]を取得できないのでしょうか。

> 月例クエリ内に> [Forms]![設定フォーム]![コンボ一覧]　を　用意し、２０２４０６を選んでから> クエリを開くと、例：２０２４０６のテーブル内容をクエリで表示、抽出など出来るとありがたい

少なくとも、年月ごとにテーブルが分割されている状況では、
クエリの機能のみによって上記のような操作を実行することは不可能です。

現時点ではワークシートをインポートする流れ自体に問題があると思いますので、
まずはその辺りから見直されることをお奨めします。