エクセルでセルを入れ替える方法

【入れ替えたいセル（例：C3からC8セル）】を選択し、Ctrl+Xを押します。

「金額」の列の1つ左にセルを挿入したいので、①「B3からB8セル」を選択してから【右クリック】し、②【切り取ったセルの挿入】を選択します。

「金額」の左の列に、切り取った「個数」の列のセルが挿入されました。

①【上下を入れ替えたいセル（例：B5）】を選択し、②セルの上を【マウスオーバー】して十字キーになるのを確認します。

セルを選択したままShiftを押しつつ【上にドラッグ】し、挿入したい箇所にH型のマークが表示されたのを確認します。

選択したセルの数値データが上下で入れ替わりました。

①Ctrlを押しながら、入れ替えしたいセルをそれぞれ【クリック】して選択します。

なお、ここで扱う合計金額の数値は数式や関数を使用しておらず、数値を直接入力しています。

②【開発】タブ、③【Visual Basic】の順に選択します。

「Microsoft Visual Basic for Applications」ダイアログボックスが表示されました。

①ここでは、「ThisWordbook」を【右クリック】し、②【挿入】、③【標準モジュール】の順に選択します。

①標準モジュールが表示されましたので、以下のコードを入力します。

Public Sub swap()
Dim Name1, Name2 As Range, Name3 As Range
If Selection.Areas.Count <> 2 Then Exit Sub
Set Name2 = Selection.Areas(1)
Set Name3 = Selection.Areas(2)
Name1 = Name2.Formula
Name2.Formula = Name3.Formula
Name3.Formula = Name1
End Sub

②【Sub/ユーザー フォームの実行】を選択し、③【×】ボタンを押します。

選択したセルの入れ替えが実行されました。

ここでは、みかんとキウイの行に入力されている値を入れ替える方法を説明します。

みかんの行にある【B5からD5セル】を選択し、Ctrl+Xを押します。

①【表の外のセル（例：F5）】を選択し、Ctrl+Vを押してみかんの行の値を貼り付けます。

②次に、キウイの行にある【B7からD7セル】を選択し、Ctrl+Xを押します。

①【B5セル】を選択し、Ctrl+Vを押して、キウイの行にあった値を貼り付けます。

②先ほど表の外に貼り付けた【F5からH5セル】を選択し、Ctrl+Xを押します。

③キウイの行にある【B7セル】を選択し、Ctrl+Vを押します。

みかんとキウイの行にあった値を入れ替えることができました。