Excelで数式を使って行を追加する方法

まずエクセルでプロジェクトを開く。データ内に行を挿入します。数式を入れたい新しい行のセルをクリックして選択します。2つ以上の行の合計を求める場合は、 を参照してください。

方法1

マクロでシートに行を追加する

1. Excelでプロジェクトを開く。これを行うには、Finder（Mac）またはFile Explorer（Windows）でデータを含むExcelドキュメントをダブルクリックします。あるいは、すでにExcelを開いている場合は、ファイル > 開くをクリックし、データのあるファイルを選択します。
2. 編集リボンに「開発者」タブが表示されていることを確認します。表示されておらず、Windowsを使用している場合は、「ファイル」タブを開き、「オプション」>「リボンのカスタマイズ」をクリックします。"メインタブ "の下にある "開発者 "の横にあるボックスにチェックを入れる。

   • Macをお使いの場合は、画面上部のExcelメニューをクリックし、環境設定を選択して、開発者タブを有効にします。リボンとツールバー」をクリックし、「このリボンをカスタマイズする」カテゴリの「開発者」にチェックを入れ、「保存」をクリックします。
3. VBAエディタを開きます。開発者]タブをクリックし、[Visual Basic]を選択します。または、Alt + F11を押すこともできます。
4. シートを右クリックします。ウィンドウの左側の垂直メニューに、ワークブックのシートのリストが表示されます。これらのどれかを右クリックすると、別のドロップダウンメニューが表示されます。
5. カーソルを「挿入」に合わせて、「モジュール」をクリックします。Insertにカーソルを合わせると、メニューの右側にメニューが飛び出します。モジュールをクリックすると、VBAコードを入力して実行するためのスペースができます。
6. このコードをVBAウィンドウに入力します：

   Sub Insert_Rows_Loop() Dim CurrentSheet As Object ' 選択されたすべてのシートをループします。 For Each CurrentSheet In ActiveWindow.SelectedSheets ' 各シートの先頭に5行を挿入します。 CurrentSheet.Range("a1:a5").EntireRow.Insert Next CurrentSheet End Sub

   • このコードでは、A1から始まりA5で終わる行が挿入されます。 つまり、シートの最上部に5つの空の行が挿入されます。これらのセル・アドレスは、シートの最後の行から任意の終端までなど、コードを配置する場所に置き換えることができます。
7. F5キーを押します。あるいは、VBエディタの書き込みスペースの上にある緑色の再生アイコンをクリックすることもできます。
8. OK をクリックして続行します。これでシートに行が追加されます。

方法2

新しい行に数式を追加する

1. Excelでプロジェクトを開きます。これを行うには、Finder（Mac）またはFile Explorer（Windows）で、データを含むExcelドキュメントをダブルクリックします。あるいは、すでにExcelを開いている場合は、ファイル > 開くをクリックしてファイルを選択します。

   • 既存の数式をデータに追加した新しい行にコピーする方法を学びたい場合は、この方法を使用してください。
2. データの中に数式をコピーします。使用するキーボードショートカットは、その上の行からしか数式を追加できないので、データコレクションの真ん中か一番下に行を挿入してください。

   • 行を挿入するには、新しい行を追加したい下の行を右クリックし、[挿入]をクリックします。
3. 数式を入れたい新しい行のセルをクリックして選択します。このキーボード・ショートカットを使用すると、数式が上のセルから選択したセルにコピーされます。

   • セルが強調表示され、選択されていることを示します。
4. Ctrl+Dを押します。このショートカットはMacでもWindowsでも同じで、上のセルから数式を下に流し込みます。

この記事は、CC BY-NC-SAの下で公開されている「 How to Add Rows in Excel with a Formula 」を改変して作成しました。特に断りのない限り、CC BY-NC-SAの下で利用可能です。