練習問題22（総合練習4）

公開日：2013-05-27　最終更新日：2019-06-27

練習問題22（総合練習4）

マクロVBA練習問題

・シート「練習22」では、各伝票の1行から6行が横に並んでいます。
　これを、
　シート「練習22_回答」を新規追加し、各伝票の行を縦に並べて下さい。

つまり、伝票の明細行が横になっているものを、縦に変換するということです。

※下の二つ目の表は結果のサンプルです。

練習問題用のExcelファイル

こちらからダウンロードできます。zipはこちらです。

シート「練習22」

Ａ	Ｂ	Ｃ	Ｄ	Ｅ	Ｆ	Ｇ	Ｈ	Ｊ	Ｋ	Ｌ	Ｍ	Ｎ	Ｏ	Ｑ	Ｒ	Ｓ	Ｔ	Ｕ
伝票番号	商品1	数量1	単価1	商品2	数量2	単価2	商品3	数量3	単価3	商品4	数量4	単価4	商品5	数量5	単価5	商品6	数量6	単価6
1	バジル	9	254	イタリアンパセリ	10	56	セルフィーユ	11	158
2	スペアミント	5	230	オレガノ	12	237	ローズマリー	10	297	タイム	1	204	セージ	2	180	ディル	11	277
3	タラゴン	12	266	木の芽	12	269	エシャレット	5	232
4	小菊	9	89
5	穂じそ	7	185	紅たて	16	182	アンティーブ（チコリ）	1	171	辛味大根	16	186
6	トレビス	7	294	ししとう	5	117	にんにく	15	248
7	プチニンニク	16	223	にんにく	17	258
8	黄金の里生姜	9	191	ぎんなん	10	90	ゆりね	8	135	にんにくのめ	5	138
9	近江生姜	10	297	大葉	16	104	みょうが	17	199
10	ゆず	3	129	すだち	12	177	かぼす	4	137	サンチエ（パオ菜）	18	185	パセリ	13	283

シート「練習22_回答」
　　Ａ　　　　　　Ｂ　　　　　　　　　Ｃ　　　Ｄ

伝票番号	商品	数量	単価
1	バジル	9	254
1	イタリアンパセリ	10	56
1	セルフィーユ	11	158
2	スペアミント	5	230
2	オレガノ	12	237

※上記表の全体を選択し、コピー(Ctrl+C)の後、エクセルのシートのA1セルに貼り付け(Ctrl+V)してください。

では、お考えください。
すぐに解答を見ずに、必ず自力で書けるとこまででも良いので書きましょう。

シンキングタイム

シンキングタイム開始

シンキングタイム終了

当サイトのコンテンツ

ExcelマクロVBA入門

この「VBA入門」シリーズは、マクロVBAを実務で自在に使いこなし業務を効率化・自動化できるようになることを目的としています。始めはより詳しく丁寧に解説しつつ少しずつ難易度を上げることで無理なく学習を進められるようにしています。ただし入門といっても、後半にはかなり高度な内容にも触れています。

書くべきマクロVBAが分からない時は、
ここでじっくり勉強してから再チャレンジしてください。

マクロVBA練習問題解答へ

では解答へ進んでください。

エクセル厳選情報メールマガジン登録
登録は無料です。
こちらの登録で、専用メールアドレスにて質問が可能となります。

解答はこちらです。「練習問題22解答」

VBA100本ノック

ツイッター連動企画です。
2020/10/19～2021/03/03の間に、ツイッターでVBAの問題を100問出題しました。
サンプルファイルもダウンロードできます。
VBA100本ノック

同じテーマ「マクロVBA練習問題」の記事

練習問題19（総合練習1）

マクロVBA練習問題・下記表の空欄を全て埋めて下さい。・客単価は、小数以下１桁で表示。・１週間の合計の客単価より低い日の客単価は赤字にして下さい。※客単価=売上÷客数練習問題用のExcelファイルこちらからダウンロードできます。

練習問題20（総合練習2）

マクロVBA練習問題・「元表」を下の「出来上がりサンプル」のようにして下さい。・月が変わったら１行挿入して、挿入した行に月の合計売上を入れて下さい。A列に、○月合計 B列に、売上の合計それぞれ太字にして下さい。

練習問題21（総合練習3）

マクロVBA練習問題・A列の都道府県から重複を失くし（ユニークにして）、D列に入れて下さい。・都道府県別の合計売上をE列に入れて下さい。練習問題用のExcelファイルこちらからダウンロードできます。

練習問題22（総合練習4）
練習問題23（総合練習5）

マクロVBA練習問題・A2セルに日付、B2セルに名前を指定します。この条件に合うデータを、シート「練習23_データ」から抜出し、５行目以降に表示して下さい。・名前は部分一致として下さい。つまり、「山」と指定した場合は、「山田」も「山口」も「木山も」対象にするということです。

練習問題24（再帰呼出し）

マクロVBA練習問題・以下の表の全組み合わせを作成して下さい。サンプルデータでは、組み合わせの数は、8*3*6*5=720通りです。・各項目はカンマ(,)で区切って下さい。・出力先は、新規シートを追加し、1行目に見出しとして"組み合わせ文字"と入れ、2行目より出力して下さい。

練習問題25（各種VBA関数）

マクロVBA練習問題・以下の表において、課題に従って元データより回答欄に出力して下さい。※１問目なら、回答欄に"Excelマクロ(vba)練習"と出力する。練習問題用のExcelファイルこちらからダウンロードできます。

練習問題26（全シート処理とハイパーリンク）

マクロVBA練習問題全シートのハイパーリンク付き一覧を先頭シートに作成します。現在のブックの先頭に新規シートを追加し、既存シートのシート名一覧をハイパーリンク付きで作成して下さい。※これは実務においても非常に良く発生する要求です。

練習問題27（データ分割し別ブック保存）

マクロVBA練習問題アクティブブックのアクティブシートのA列に担当、B列に支店が入っています。支店ごとのブックを作成して下さい。作成したブックの保存先は、アクティブブックと同一フォルダとして下さい。

練習問題28（シートを別ブックにして値のみにする）

マクロVBA練習問題アクティブブックにはシートが複数（Sheet1,Sheet2,Sheet3）あります。Sheet1だけを別ブックにして、計算式を抜き（値だけに）にしてから保存して下さい。作成したブックの保存先は、アクティブブックと同一フォルダとし、ブック名はシート名と同一にして下さい。

練習問題29（ロット引き当て）

マクロVBA練習問題入荷後の在庫を、注文に対して割り振ります。以下の表をみて下さい。この表において、F列と、H列～K列を埋めます。注文数に見合った、入荷数を割り振ります。本来なら、別々のシートにするところですが、説明の便宜上とマクロの理解しやすさの点を考慮して、1シートにしています。

アクセスランキング・・・ランキング一覧を見る

1.最終行の取得（End,Rows.Count）｜VBA入門
2.繰り返し処理（For Next)｜VBA入門
3.セルのコピー&値の貼り付け（PasteSpecial）｜VBA入門
4.変数宣言のDimとデータ型｜VBA入門
5.RangeとCellsの使い方｜VBA入門
6.ブックを閉じる・保存（Close,Save,SaveAs）｜VBA入門
7.セルのクリア（Clear,ClearContents）｜VBA入門
8.メッセージボックス(MsgBox関数)｜VBA入門
9.条件分岐（Select Case）｜VBA入門
10.ブック・シートの選択（Select,Activate）｜VBA入門

ホーム
マクロVBA入門編
マクロVBA練習問題
練習問題22（総合練習4）

このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。

記述には細心の注意をしたつもりですが、
間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。
掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。

VBA練習問題
練習問題22（総合練習4）