EXCELの行を入れ替える方法は？ 3行目と4行目を入れ替えたい！ | Excelトピックス

2025.02.08
スポンサーリンク
スポンサーリンク

Excelの行を入れ替える方法

Excelで3行目と4行目を入れ替えたい場合、手作業でコピー＆ペーストする方法だけでなく、ドラッグ操作やVBAを活用する方法もあります。この記事では、Excelで簡単に行を入れ替える方法をいくつか紹介します。

ドラッグ操作で行を入れ替える方法 (おすすめ)

Excelでは、Shiftキーを使ったドラッグ操作で簡単に行を入れ替えることができます。

手順 3行目と4行目を入れ替える例

  1. 入れ替えたい行（3行目）を選択します。
  2. 選択した行の境界(緑の線)にマウスカーソルを合わせ、「十字矢印」マーク（移動アイコン）が表示されるのを確認します。
  3. Shiftキーを押しながら、目的の位置（4行目の下）にドラッグします。
  4. マウスボタンを離すと、3行目と4行目が入れ替わります。

この方法は直感的で簡単ですが、Excelのバージョンによってはうまく動作しない場合もあります。

コピー＆ペーストで行を入れ替える方法

もう一つの簡単な方法として、コピー＆ペーストを活用することもできます。

手順

  1. 3行目全体を選択し、Ctrl + X（または右クリック→「切り取り」）を実行します。(心配な場合はコピー)
  2. 入力が何もない行を選択し、Ctrl + V（または右クリック→「貼り付け」）を実行します。
  3. 元の4行目を3行目にコピーします。
  4. 先ほど2.でコピーした行を4行目にコピーします。

この方法は、元のデータを上書きしないように注意が必要ですが、確実に行を入れ替えることができます。

VBAを使って行を入れ替える方法(参考)

VBA（マクロ）を使用すると、ボタン一つで簡単に行を入れ替えることができます。

VBAコード

以下のコードを実行すると、3行目と4行目が簡単に入れ替わります。

Sub SwapRows()
    Dim ws As Worksheet
    Set ws = ActiveSheet
    
    Dim row1 As Integer, row2 As Integer
    row1 = 3 ' 入れ替える最初の行
    row2 = 4 ' 入れ替える次の行
    
    ws.Rows(row1).Cut
    ws.Rows(row2 + 1).Insert Shift:=xlDown
    ws.Rows(row2).Cut
    ws.Rows(row1).Insert Shift:=xlDown
    Application.CutCopyMode = False
End Sub

手順

  1. Alt + F11を押してVBAエディターを開きます。
  2. 「挿入」→「標準モジュール」を選択し、新しいモジュールを作成します。
  3. 上記のコードをコピーして貼り付けます。
  4. 「実行」ボタン（またはF5キー）を押すと、3行目と4行目が入れ替わります。

この方法は、複数のシートで繰り返し作業をする場合に特に便利です。

まとめ

Excelで3行目と4行目を入れ替えるには、以下の方法があります。

  • ドラッグ操作：Shiftキーを押しながらドラッグする。
  • コピー＆ペースト：切り取り→貼り付けを利用する。
  • VBA：マクロを実行して一瞬で入れ替える。

状況に応じて最適な方法を選び、作業を効率化しましょう。

使用した関数について

今回の記事ではExcelの標準関数は使用していませんが、VBAを活用した方法を紹介しました。

スポンサーリンク