Excel で値が変化する位置に空白行を挿入するには、どうすればよいですか?
![]() | ![]() | ![]() |
ある範囲のデータについて、値が変化する位置に空白行を挿入し、1 つの列内で連続する同じ値を以下のスクリーンショットのように分離したい場合があります。本記事では、この課題を解決するためのいくつかのテクニックをご紹介します。
小計機能で値が変化する位置に空白行を挿入する
小計機能を使えば、値が変わる位置に自動で空白行を挿入できます。以下の手順に従ってください。
1.使用したいデータ範囲を選択します。
2.データ>小計をクリックして小計ダイアログボックスを開き、小計ダイアログで以下の操作を行います。

3.次にOKをクリックすると、異なる製品の間に小計行が挿入され、テーブルの左側にアウトライン記号が表示されます(スクリーンショット参照)。

4.次に、アウトライン記号の上部にある数字「2」をクリックして、小計行のみを表示します。

5.次に小計の範囲データを選択し、Alt+;ショートカットキーを押して、表示されている行のみを素早く選択しましょう(スクリーンショット参照)。

6.表示されている行のみを選択した後、キーボードのDeleteキーを押すと、すべての小計行が削除されます。
7.次に他のセルをクリックし、データ>グループ解除>アウトラインのクリアをクリックして、アウトラインを削除します(スクリーンショット参照)。

8.これでアウトライン記号が一括でクリアされ、値が変化する位置にデータ間に空白行が挿入されたことを確認できます(スクリーンショット参照)。

9.最後に、必要に応じて A 列を削除できます。
強力な機能で値が変化する位置に指定した数の空白行を挿入する
上記の煩雑な手順に疲れてしまったら、ぜひこの便利なツール——Kutools for Excelの列の変更をマークする機能をご活用ください!セルの値が変わる位置に、改ページや空白行、下罫線、塗りつぶし色を素早く簡単に挿入できます。
ヒント:Kutools for Excelをまずダウンロードしてから、この列の変更をマークする機能を簡単かつ素早くご利用ください。
Kutools for Excelをインストールした後、以下の手順で操作してください。
1.Kutools > 書式 > 列の変更をマークするをクリックします(スクリーンショット参照)。

2.列の変更をマークするダイアログボックスで、次の操作を行ってください。
- 使用したいデータ範囲を選択し、空白行を挿入する基準となるキーカラムを選んでください。
- 次に、空白行オプションをオプションセクションでチェックし、挿入したい空白行の数を入力してください。

3.次にOKボタンをクリックすると、セルの値が変化する位置に指定した数の空白行がデータ内に挿入されます(スクリーンショット参照)。
![]() | ![]() | ![]() |
Kutools for Excel を今すぐダウンロードして無料トライアル!
補助列を使って値が変化する位置に空白行を挿入する
補助列を使う場合は、まず数式を挿入し、次に検索と置換関数を適用し、最後に値が変化する位置に空白行を挿入します。以下の手順に従って操作してください。
1.空白セル C3 に数式 =A3=A2を、セル D4 には数式 =A4=A3をそれぞれ入力します(スクリーンショット参照)。

2.次に C3:D4 を選択し、フィルハンドルを数式を適用したい範囲までドラッグすると、セルにTRUEまたはFALSEが表示されます(スクリーンショット参照)。

3.次に、Ctrl + Fキーを押して検索と置換ダイアログを開きます。FALSEを表示されたダイアログの検索対象テキストボックス()検索タブ内)に入力し、オプションボタンをクリックしてダイアログを展開したら、検索範囲ドロップダウンリストから値を選択します(スクリーンショット参照)。

4.すべて検索ボタンをクリックし、続いてCtrl + Aを押すと、検索結果のすべての FALSE セルが一括で選択されます(スクリーンショット参照)。

6.検索と置換ダイアログを閉じた後、次のステップとして、ホーム>挿入>シートの行を挿入をクリックして空白行を挿入できます。これにより、列 A の値が変化する位置にデータ内に空白行が自動的に挿入されます(スクリーンショット参照)。
![]() | ![]() | ![]() |
7.最後に、必要に応じて補助列 C および D を削除できます。
VBA コードで値が変化する位置に空白行を挿入する
上記の方法の使用に疲れてしまった場合は、以下のコードも値が変化する位置に空白行を一度に挿入するのに役立ちます。
1.ALT + F11キーを押して、Microsoft Visual Basic for Applications ウィンドウを開きます。
2.挿入>モジュールをクリックし、表示されるモジュールウィンドウに以下のコードを貼り付けてください。
VBA コード:値が変化する位置に空白行を挿入する
Sub InsertRowsAtValueChange()
'Update by Extendoffice
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Application.ScreenUpdating = False
For i = WorkRng.Rows.Count To 2 Step -1
If WorkRng.Cells(i, 1).Value <> WorkRng.Cells(i - 1, 1).Value Then
WorkRng.Cells(i, 1).EntireRow.Insert
End If
Next
Application.ScreenUpdating = True
End Sub
3.次にF5キーを押してこのコードを実行すると、値が変化する位置に空白行を挿入するための基準列として使用するデータを選択するプロンプトボックスが表示されます(スクリーンショット参照)。

4.次にOKをクリックすると、列 A の値が変わる位置にデータの間に空白行が挿入されます。
最高の Office 業務効率化ツール
| 🤖 | KUTOOLS AI アシスタント:次に基づいてデータ分析を革新します:インテリジェント実行 | コード生成| カスタム数式作成 | データ分析とチャート生成| 拡張機能呼び出し… |
| 人気の機能:検索・ハイライト、または重複をマーキング | 空白行を削除する | データを失うことなく列の結合またはセルを | 数式を使用しない四捨五入... | |
| スーパー LOOKUP:複数条件 VLookup | 複数値 VLookup | 複数シート間 VLookup | ファジーマッチ.... | |
| 高度なドロップダウンリスト:ドロップダウンリストをすばやく作成 | 連動型ドロップダウンリスト | 複数選択可能なドロップダウンリスト.... | |
| 列マネージャー:指定した数の列を追加|列の移動|非表示列の表示状態を切り替え|範囲および列の比較... | |
| 注目の機能:グリッドフォーカス | デザインビュー |強化された数式バー | ワークブックとシートマネージャー | リソースライブラリ(オートテキスト)| 日付ピッカー | ワークシートの統合 | 暗号化/セルの復号化 | リストからメール送信 | スーパーフィルター | 特殊フィルタ(太字のフォントを持つセルをフィルタリング/斜体/取り消し線。。。) 。。。 | |
| トップ15 ツールセット:12 テキストツール(テキストの追加、特定の文字を削除、...)| 50+チャートタイプ(ガントチャート、...)| 40+実用的関数(誕生日に基づいて年齢を計算します、...)| 19 挿入ツール(QR コードを挿入、パスから画像を挿入、...)| 12 変換ツール(単語に変換する、為替レートの変換、...)| 7 結合と分割ツール(高度な行のマージ、セルの分割、...)|さらに多数 |
Kutools for Excel でExcel スキルを強化し、これまでにない効率を体験しましょう。Kutools for Excel は、生産性を高め、時間を大幅に節約できる高度な機能を300 以上提供します。最も必要な機能を今すぐ入手するにはこちらをクリック。。。
Office Tab は Office にタブインターフェースをもたらし、作業を大幅に簡単にします
- Word、Excel、PowerPoint でタブを使った編集と閲覧を有効にします。Publisher、Access、Visio、Project でもご利用いただけます。
- 複数のドキュメントを、新しいウィンドウではなく、同じウィンドウ内の新しいタブで開いたり作成したりできます。
- 日々の生産性を50%も向上させ、毎日数百回ものマウスクリックを削減します!
すべてのKutools アドインが、たった1 つのインストーラーで完結。
Kutools for Officeスイートには、Excel ・Word ・Outlook ・PowerPoint 用のアドインと Office Tab Pro が含まれており、複数の Office アプリを横断して作業するチームに最適です。
- オールインワンスイート— Excel、Word、Outlook、PowerPoint 用アドイン+Office Tab Pro
- インストーラー1 つ、ライセンス1 つ— 数分でセットアップ可能(MSI 対応)
- 連携してさらにパワーアップ— Office アプリ全体で生産性が向上
- 30 日間のフル機能トライアル— 登録不要、クレジットカード不要
- 最高のお得感— 個別アドイン購入よりお得






