Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1057 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【8977】１レコードのデータを複数レコードに Makiko 07/1/12(金) 15:34 質問[未読]
【8978】Re:１レコードのデータを複数レコードに にしもり 07/1/12(金) 17:12 回答[未読]
【8979】Re:１レコードのデータを複数レコードに Makiko 07/1/12(金) 17:24 質問[未読]
【8980】Re:１レコードのデータを複数レコードに にしもり 07/1/12(金) 17:34 発言[未読]
【8981】Re:１レコードのデータを複数レコードに Gin_II 07/1/12(金) 17:39 回答[未読]
【8982】Re:１レコードのデータを複数レコードに Makiko 07/1/12(金) 19:51 お礼[未読]
【8977】１レコードのデータを複数レコードに
質問  Makiko  - 07/1/12(金) 15:34 -
引用なし
パスワード
   ACCESS初心者です。
１レコードしかないクエリファイルの各フィールドのデータを
複数レコードにして別のファイルにしたいのですが、どのようにすれば
いのでしょうか？

例）　合計ファイルと品名個数ファイルがあるとします。
　　　合計ファイルには１レコードのデータが、
　　　品名個数ファイルには４レコードのデータがあります。
　　　合計ファイルのデータを品名個数ファイルに転記したいのです。

　■合計ファイル（１レコードのみ）
　　フィールド：りんご、みかん、バナナ、キウイ
　　データ：５，１０，６，７

　■品名個数ファイル（４レコード）
　　フィールド：品名、個数
　　データ：りんご、　○○
　　　　　　みかん、　○○
　　　　　　バナナ、　○○
　　　　　　キウイ、　○○

　　この○○に、合計ファイルのデータが入るようにしたいのです。

いかがでしょうか？
よろしくお願いします。
　　　　　　
　　
【8978】Re:１レコードのデータを複数レコードに
回答  にしもり  - 07/1/12(金) 17:12 -
引用なし
パスワード
   ▼Makiko さん：
元のテーブルをデータｼｰﾄビューで開き、
最左上をグレーのところをクリックして全選択してからコピーし、
Excelを開いて貼り付け、

フィールド　　　　りんご　　　　みかん　　　　バナナ　　　　キウイ
データ　　　　5　　　　10　　　　6　　　　7

を範囲選択してコピーし、任意の空白セルを選択してから
編集-形式を選択して貼り付け-行列を入れ替えるにチェック-okを押下し、

りんご　　　　5
みかん　　　　10
バナナ　　　　6
キウイ　　　　7

を範囲選択してコピーし、AccESSに戻って、
あらかじめ入れ物だけつくったテーブルに（フィールド１を品名、フィールド２を個数、中身は空のテーブルに）、編集-追加貼り付けしてはいかがでしょうか？
初心者が初心者に教えてすみません。
【8979】Re:１レコードのデータを複数レコードに
質問  Makiko  - 07/1/12(金) 17:24 -
引用なし
パスワード
   にしもり　さん

早速のご回答ありがとうございます。
でも、私の質問の仕方が悪かったですね、ごめんなさい。
エンドユーザが簡単にできるようにしたいのです。
簡単というのは、人の手が入らずにです。
ボタンをクリックするぐらいはＯＫですけですけどね。
よろしくお願いします。


▼にしもり さん：
>▼Makiko さん：
>元のテーブルをデータｼｰﾄビューで開き、
>最左上をグレーのところをクリックして全選択してからコピーし、
>Excelを開いて貼り付け、
>
>フィールド　　　　りんご　　　　みかん　　　　バナナ　　　　キウイ
>データ　　　　5　　　　10　　　　6　　　　7
>
>を範囲選択してコピーし、任意の空白セルを選択してから
>編集-形式を選択して貼り付け-行列を入れ替えるにチェック-okを押下し、
>
>りんご　　　　5
>みかん　　　　10
>バナナ　　　　6
>キウイ　　　　7
>
>を範囲選択してコピーし、AccESSに戻って、
>あらかじめ入れ物だけつくったテーブルに（フィールド１を品名、フィールド２を個数、中身は空のテーブルに）、編集-追加貼り付けしてはいかがでしょうか？
>初心者が初心者に教えてすみません。
【8980】Re:１レコードのデータを複数レコードに
発言  にしもり  - 07/1/12(金) 17:34 -
引用なし
パスワード
   ▼Makiko さん：
>にしもり　さん
>
>早速のご回答ありがとうございます。
>でも、私の質問の仕方が悪かったですね、ごめんなさい。
>エンドユーザが簡単にできるようにしたいのです。
>簡単というのは、人の手が入らずにです。
>ボタンをクリックするぐらいはＯＫ

うーん、それはわたくしの力量を超えてますので、上級者からの回答をお待ちになってください。余計な発言をしてすみませんでした。
【8981】Re:１レコードのデータを複数レコードに
回答  Gin_II  - 07/1/12(金) 17:39 -
引用なし
パスワード
   > 合計ファイルのデータを品名個数ファイルに転記したいのです。

クエリで可能です。

SELECT "りんご" AS 品名, [りんご] AS 個数 FROM 合計ファイル
UNION ALL
SELECT "みかん", [みかん] FROM 合計ファイル
UNION ALL
SELECT "バナナ", [バナナ] FROM 合計ファイル
UNION ALL
SELECT "キウイ", [キウイ] FROM 合計ファイル


クエリの新規作成から、「表示」→「SQLビュー」に記述してください。

合計ファイルのフィールド名が変わるのであれば、VBAが必要になるでしょうけど。
【8982】Re:１レコードのデータを複数レコードに
お礼  Makiko  - 07/1/12(金) 19:51 -
引用なし
パスワード
   Gin_II さん

こんばんは。
教えていただいたとおりにやりましたら、ちゃんとできました。
どうもありがとうございました。
とても助かりました。
また、質問をしました際は、よろしくお願いします。
本当にありがとうございました。

Makiko

▼Gin_II さん：
>> 合計ファイルのデータを品名個数ファイルに転記したいのです。
>
>クエリで可能です。
>
>SELECT "りんご" AS 品名, [りんご] AS 個数 FROM 合計ファイル
>UNION ALL
>SELECT "みかん", [みかん] FROM 合計ファイル
>UNION ALL
>SELECT "バナナ", [バナナ] FROM 合計ファイル
>UNION ALL
>SELECT "キウイ", [キウイ] FROM 合計ファイル
>
>
>クエリの新規作成から、「表示」→「SQLビュー」に記述してください。
>
>合計ファイルのフィールド名が変わるのであれば、VBAが必要になるでしょうけど。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1057 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
1078205
(SS)C-BOARD v3.8 is Free