Accessテーブルの行に日付が4/1~8/14、列フィールドに都道府県が47個並んでいます。
テーブルの中身は、日付毎、都道府県ごとの天気模様が記されています。
北海道 青森 秋田 岩手 山形 宮城 福島 新潟 ・・・・・・・
4月1日 雨・曇 曇り 晴れ 雨・雷 晴れ 台風 雨・雷 大雨・雷
4月2日 雨・曇 曇り 晴れ 雨・雷 晴れ 台風 雨・雷 大雨・曇り
4月3日 雨・雷 曇り 晴れ 雨・雷 晴れ 台風 雨・雷 雨・雷
4月4日 雨・曇 曇り 晴れ 雨・雷 晴れ 晴れ 雨・雷 大雨・曇り
4月5日 雨・雷 曇り 晴れ 雨・雷 晴れ 晴れ 雨・雷 大雨・曇り
4月6日 雨・曇 曇り 晴・雷 雨・雷 晴れ 晴れ 雨・雷 大雨・雷
・
・
・
このテーブルの中から、”*雷*”というキーワードが書かれているデータを抽出したいです。
フィールドが5個ぐらいならば検索条件欄に”*雷*”というキーワードを1段づらしで書いてできたのですが、47個も縦に検索条件設定できません。
できれば、
4月1日 4月2日 4月3日 ・ ・ ・
岩手 岩手 北海道
福島 福島 岩手
福島
新潟
といった具合で表示したいと思っているのですが、どなたかやり方を教えて頂けませんでしょうか。
もしかしたら簡単な内容かもしれませんが、何分初心者で困ってます。
よろしくお願いいたします。
A 回答 (2件)
- 最新から表示
- 回答順に表示
No.2
- 回答日時:
日付 北海道 青森 秋田 岩手 山形 宮城 福島 新潟
4月1日 雨・曇 曇り 晴れ 雨・雷 晴れ 台風 雨・雷 大雨・雷
4月2日 雨・曇 曇り 晴れ 雨・雷 晴れ 台風 雨・雷 大雨・曇り
4月3日 雨・雷 曇り 晴れ 雨・雷 晴れ 台風 雨・雷 雨・雷
4月4日 雨・曇 曇り 晴れ 雨・雷 晴れ 晴れ 雨・雷 大雨・曇り
4月5日 雨・雷 曇り 晴れ 雨・雷 晴れ 晴れ 雨・雷 大雨・曇り
4月6日 雨・曇 曇り 晴・雷 雨・雷 晴れ 晴れ 雨・雷 大雨・雷
これだと非常に扱いにくいExcel的なレイアウトなので
縦に展開した
日付天気県名県番
2013/04/01雨・曇北海道1
2013/04/02雨・曇北海道1
2013/04/03雨・雷北海道1
2013/04/04雨・曇北海道1
2013/04/05雨・雷北海道1
2013/04/06雨・曇北海道1
2013/04/01曇り青森2
2013/04/02曇り青森2
のようにする必要があります。
Excelに出力してカットアンドコピーで整列させて
Accessにインポートするか
ユニオンクエリ+テーブル作成クエリで作る必要があります。
県番は北から南に並べるために使います。
SELECT Q.* INTO TBL1
FROM (SELECT TBL.日付, TBL.北海道 AS 天気 ,'北海道' AS 県名 ,1 AS 県番 FROM TBL
UNION ALL
SELECT TBL.日付, TBL.青森 AS 天気 ,'青森' AS 県名 ,2 AS 県番 FROM TBL
UNION ALL
SELECT TBL.日付, TBL.秋田 AS 天気 ,'秋田' AS 県名 ,3 AS 県番 FROM TBL
UNION ALL
SELECT TBL.日付, TBL.岩手 AS 天気 ,'岩手' AS 県名 ,4 AS 県番 FROM TBL
UNION ALL
SELECT TBL.日付, TBL.山形 AS 天気 ,'山形' AS 県名 ,5 AS 県番 FROM TBL
UNION ALL
SELECT TBL.日付, TBL.宮城 AS 天気 ,'宮城' AS 県名 ,6 AS 県番 FROM TBL
UNION ALL
SELECT TBL.日付, TBL.福島 AS 天気 ,'福島' AS 県名 ,7 AS 県番 FROM TBL
UNION ALL
SELECT TBL.日付, TBL.新潟 AS 天気 ,'新潟' AS 県名 ,8 AS 県番 FROM TBL
) AS Q;
沖縄までつなげていってください。
これを『Q_TBL1作成』として保存します。
ダブルクリックすると、TBL1が作成されます(内容は上記の例のとおり)
次に最終目的の形に持ってゆくためにTBL1テーブルからもう一丁
SQL文は、
PARAMETERS [天気は] Text ( 255 );
SELECT 日付, 天気, 県番, 県名, [天気は] & (SELECT COUNT(*) FROM TBL1 AS Q WHERE TBL1.天気 = Q.天気 and TBL1.日付 = Q.日付 and TBL1.県番 >= Q.県番) AS 天気2 INTO TBL2
FROM TBL1
WHERE ((TBL1.天気) Like '*' & [天気は] & '*')
ORDER BY 日付, 天気, 県番;
これを『Q_TBL2作成』として保存します。
ダブルクリックで開くと、天気を聞いてきますので、雷 とでも入れてみてください。
これでTBL2が作成されます。
最後に、ようやくクロス集計の出番
SQL文は
TRANSFORM First(TBL2.県名) AS 県名の先頭
SELECT TBL2.天気2
FROM TBL2
GROUP BY TBL2.天気2
PIVOT Format([日付],"mm/dd");
で添付画像のようになります。
作業用のテーブルを作っていますので、いまいちな出来です。
雷1~4は気にしないでください (^_^;
No.1
- 回答日時:
その「5個条件書いたクエリ」を元に作りましょう。
クエリをデザインビューで開きさらに右クリックでSQLビューで開く。
何か、別のテキストエディタヘコピペして下さい。
WHERE以降が抽出条件。余分なカッコは整理して、47都道府県の行を作って下さい。
面倒ならEXCELで文字連結で作るも良し。
できあがったSQL文をコピペでクエリに貼付たら右クリックして
デザインビューに戻して下さい。
できあがったクエリを元にクロス集計ですね。
余談だが都道府県名の頭にコード(01~47)を加えておくと並びが見やすくなりますよ。
この回答への補足
bin-chanさん
回答ありがとうございます。
bin-chanさん回答内容について質問させてください。
>できあがったSQL文をコピペでクエリに貼付たら右クリックして
>デザインビューに戻して下さい。
ここまではできました。
ありがとうございます。
>できあがったクエリを元にクロス集計ですね。
このやり方が分かりません。
列見出し、行見出し、カウント方法、どう設定したらいいのか分かりません。
お手数ですが教えて頂けませんでしょうか。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- その他(災害) 晴れてる時も雷とかって鳴るんでしょうか?雨の可能性は夜の9時頃あるらしいです。雷雲はあります可能性あ 4 2023/08/19 12:45
- 英語 天候の英語表現 2 2023/03/10 09:08
- 宇宙科学・天文学・天気 天気分布予報で海岸線沿いに天気が晴れと曇りに分かれることがある 1 2023/06/30 19:13
- その他(車) 5月半ばまで暑くて車のフロントガラスに暑さ防止のサンシェードを付けていました でも5月下旬から梅雨入 1 2023/06/05 19:49
- ノンジャンルトーク 私は大雨とか雷が鳴ってるのが大好きです。 なんか、安心感があると言うか、落ち着くんですよね。 特に家 1 2023/07/26 19:02
- 宇宙科学・天文学・天気 天気予報について教えていただきたいです。 9月9日に兵庫県へ行きます。 iPhoneの天気予報では雨 2 2022/09/05 09:01
- 大学・短大 数学の確立問題です 明日の天気によりお弁当が500個売れるか決まる。お弁当が500個売れる確率は晴れ 2 2022/07/26 15:47
- 宇宙科学・天文学・天気 天気予報 3 2022/05/16 14:03
- 国産車 車のラジオはどういう日により良く受信できますか。 快晴 薄曇り 曇り 小雨 雨 大雨 深夜 早朝 明 5 2022/05/07 08:03
- 大雨・洪水 今年は、雷が異常に多い気がするのですが。 3 2022/08/18 10:13
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Access レポート印刷するときに...
-
access2021 印刷プレビューでの...
-
accessデータを指定したExcel、...
-
Accessのクエリで、replace関数...
-
Accessのテキストボックスの入...
-
Microsoft365にAccessってあり...
-
Vba Userformを前面に出すについて
-
Accessのフォーム上のテキスト...
-
実行時エラー3131 FROM 句の構...
-
【Access】Dcount関数の複数条...
-
Access で半角スペースと全角ス...
-
access2019 チェックボックスと...
-
access クエリ yes/no型のクエ...
-
Accessのクエリの結果を、既存...
-
ACCESS VBA でのエラー解決の根...
-
Access VBA [リモートサーバー...
-
Access VBA でHTML文を表示したい
-
ACCESS2019でのエラーメッセージ
-
Access 複数条件検索の設定が上...
-
Accessのスプレッドシートエク...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Access レポート印刷するときに...
-
Microsoft365にAccessってあり...
-
Accessのクエリで、replace関数...
-
ACCESS VBA でのエラー解決の根...
-
Accessのスプレッドシートエク...
-
Access VBA を利用して、フォル...
-
【Access】Dcount関数の複数条...
-
accessデータを指定したExcel、...
-
Accessレポートのチェックボッ...
-
Access VBA [リモートサーバー...
-
Vba Userformを前面に出すについて
-
Accessのリンクテーブルのパス...
-
実行時エラー3131 FROM 句の構...
-
Accessのフォーム上のテキスト...
-
CSVファイルの「0落ち」にVBA
-
Access 複数条件検索の設定が上...
-
アクセス 削除するレコードを含...
-
Access で半角スペースと全角ス...
-
access 更新クエリについて
-
Accessのクエリの結果を、既存...
おすすめ情報