コントロールソースをVBAで動的に書きかえる方法 フォーム名 F_予約、ヘッダーにテキストボックスを配置して名前を 開始日 とする。レコードソースは空白にしておきます。また、ヘッダーの日付表示ラベルの名前は、lbl0, lbl1, ・・・lbl6、詳細セクションの値表示用のテキストボックスの名前は、 txt0, txt1, ・・・txt6 とします。 下記のクエリ「Q_予約」を作成 PARAMETERS Forms!F_予約!開始日 DateTime; TRANSFORM First(T_予約.名前) AS 名前の先頭 SELECT T_予約.予約時刻 FROM T_予約 WHERE T_予約.予約日 Between Forms!F_予約!開始日 And Forms!F_予約!開始日+6 GROUP BY T_予約.予約時刻 ORDER BY T_予約.予約時刻, Format([予約日]
![列名が変化するクロス集計クエリと連結するフォーム](https://cdn-ak-scissors.b.st-hatena.com/image/square/2712f0cd26f8cf660b153c8035210885f1b42790/height=288;version=1;width=512/https%3A%2F%2Fblog-imgs-29.fc2.com%2Fh%2Fa%2Ft%2Fhatenachips%2FFrmCrossQuerySource.png)