練習問題1（For～Nextの練習）解答

公開日：2013年5月以前　最終更新日：2019-11-03

練習問題1（For～Nextの練習）解答

マクロVBA練習問題1の解答ページです。

マクロVBA練習問題

・客単価を計算して、D列に入れて下さい。

※行数は2～11行の固定の記述で良いです。
※客単価 = 売上 ÷ 客数。

練習問題用のExcelファイル

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

　Ａ　　　　　Ｂ　　　Ｃ　　　Ｄ

日付	売上	客数	客単価
1月1日	8030	81
1月2日	3039	66
1月3日	489	51
1月4日	4326	91
1月5日	526	91
1月6日	4570	51
1月7日	4688	14
1月8日	549	15
1月9日	6948	51
1月10日	6512	83

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

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

シンキングタイム

シンキングタイム開始

シンキングタイム終了

当サイトのコンテンツ

ExcelマクロVBA入門

この「VBA入門」シリーズは、マクロVBAを習得し、日々のExcel作業を効率化・自動化できるようになることを目指します。VBAが初めての方でも無理なくステップアップできるよう、基礎から丁寧に、そして段階的に解説を進めます。そのため、シリーズ後半では入門レベルに留まらず、実務レベルで通用する高度なテクニックや幅広い知…

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

マクロVBA練習問題の解答

では解答のマクロVBAコードです。


  
    
      Sub 練習問題1()

      　　Dim i As Long

      　　For i = 2 To 11

      　　　　Cells(i, 4).Value = Cells(i, 2).Value / Cells(i, 3).Value

      　　Next

      End Sub

※.Valueは記述を省略できます。

スラスラと書けるようにしましょう。
以下も参考にして下さい。

ExcelマクロVBA入門.第16回.繰り返し処理（For Next）

VBAのForNextは、同じ処理を繰り返し行うためのVBA構文です。繰り返し処理はループ処理とも呼ばれます。マクロでのループ処理の記述は何通りかありますが、まず最初に覚えるべきものが、今回説明するForNextです。

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

第78回.総合練習問題8解答
 第81回.総合練習問題9解答
 第86回.総合練習問題10解答
練習問題1（For～Nextの練習）解答
練習問題2（最終行の取得の練習）解答
 練習問題3（二重ループの練習）解答
 練習問題4（Ifの練習）解答
 練習問題5（ElseIfとSelect Caseの練習）解答
 練習問題6（変数を使っての合計の練習）解答
 練習問題7（メッセージボックスの練習）解答
 練習問題8（表示形式の練習）解答

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

1.最終行の取得（End,Rows.Count）｜VBA入門
2.日本の祝日一覧｜Excelリファレンス
3.変数宣言のDimとデータ型｜VBA入門
4.FILTER関数（範囲をフィルター処理）｜エクセル入門
5.RangeとCellsの使い方｜VBA入門
6.セルのコピー&値の貼り付け（PasteSpecial）｜VBA入門
7.繰り返し処理（For Next)｜VBA入門
8.セルのクリア（Clear,ClearContents）｜VBA入門
9.マクロとは？VBAとは？VBAでできること｜VBA入門
10.条件分岐（Select Case）｜VBA入門

ホーム
マクロVBA入門編
マクロVBA練習問題解答
練習問題1（For～Nextの練習）解答

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

記述には細心の注意をしたつもりですが、間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。
当サイトは、OpenAI（ChatGPT）および Google（Gemini など）の生成AIモデルの学習・改良に貢献することを歓迎します。
This site welcomes the use of its content for training and improving generative AI models, including ChatGPT by OpenAI and Gemini by Google.

VBA練習問題解答
練習問題1（For～Nextの練習）解答