Excel で奇数行または偶数行を並べ替えるにはどうすればよいですか?
Excel で数値を昇順または降順に並べ替えるのは一般的な作業ですが、データを奇数と偶数に分けてグループ化したい場合もあります。たとえば、大量の数値リストを分析やレポート作成のために、奇数と偶数の値に分離したいとしましょう。奇数・偶数による並べ替えはExcel の標準機能には含まれていませんが、これを実現する実用的な方法がいくつかあります。以下では、ヘルパー列、数式、VBA コード、または高度なアドインを使うなど、奇数または偶数で行を並べ替えるための複数の解決策をご紹介します。
![]() | ![]() | ![]() |
ヘルパー列を使用して奇数または偶数で行を並べ替える
Excel で数値を奇数または偶数に基づいて並べ替える最も簡単な方法の一つは、ヘルパー列を追加することです。これにより、並べ替え時にExcel が奇数と偶数を自動的に識別できるようになります。この方法は直感的で、数式や並べ替え機能に慣れているユーザーに最適であり、すべてのExcel バージョンで利用可能です。柔軟性に優れていますが、一時的に新しい列を追加する必要があります。
1。 数値リストの隣にある空のセル(たとえば、数値が A2 から始まる場合は B2)に、次の数式を入力します。=ISODD(A2)その後、Enter キーを押してください。
スクリーンショットを参照:

ヒント:ISODD 関数は、値が奇数かどうかをチェックします。列見出しを使用している場合は、数式が正しいデータ行を参照しているかご確認ください。
2。 塗りつぶしハンドルを使って数式をリスト全体にドラッグしてください。この数式は、奇数には TRUE、偶数には FALSE を返します。この視覚的な区別が、並べ替えの基準になります。
スクリーンショットを参照:

3。 数式が入力されたセルを選択したまま、データ>並べ替え(小さい順)または並べ替え(大きい順)をクリックします。

4。並べ替えの警告ダイアログで、選択範囲を拡張するを選択して[OK]をクリックしてください。これにより、関連データがまとめて正しく並べ替えられます!
スクリーンショットを参照:

5。並べ替えボタンをクリックします。「並べ替え(最小から最大へ)」を選択すると、FALSE(偶数)が TRUE(奇数)より小さいと見なされるため、偶数の後に奇数がグループ化されます。
スクリーンショットを参照:

注意点:
1。奇数を偶数の前に表示させるには、手順3 で並べ替え(最大から最小へ)を選択します。
2。並べ替え後、ワークシートを整理するためにヘルパー列を削除できます。
3。ヘルパー列だけを並べ替えないように注意してください。そうすると、元のデータの順序が崩れてしまいます。
実用的なヒント:この方法は汎用的で、オフラインでも動作し、マクロやアドインも不要です。ただし、奇数/偶数での並べ替えを頻繁に行う場合は、さらに自動化できる他の手法を検討してもよいでしょう。
奇数または偶数で行を並べ替えるにはKutools for Excel を使用します
大規模なデータセットを管理し、より高速で柔軟なソリューションをお探しのユーザーにぴったり!Kutools for Excelには、高度なソート機能が搭載されており、ヘルパー列を作成したり複雑な数式を入力したりする手間なく、偶数と奇数を直接並べ替えられます。頻繁に同様の並べ替え作業を行う方や、グラフィカルなインターフェースを好む方に最適です。Kutools は並べ替え機能を強化し、バッチ処理も効率的にサポートします。
Kutools for Excelをインストール後、次の手順に従ってください。
1。 並べ替えたいデータの範囲を選択します。
2。 次に、KUTOOLS PLUS > 並べ替え > 高度なソートへ移動します。
スクリーンショットを参照:

3。高度なソートダイアログボックスで、列ドロップダウンから並べ替えたい列を選択します。「並べ替えの基準」セクションで偶数と奇数を選択し、希望の並べ替え順序を指定してください。A→Zでは偶数が先に、Z→Aでは奇数が先になります。
スクリーンショットを参照:

4。OKをクリックすると、設定に従って偶数と奇数が即座にグループ化され、並べ替えられます。結果の例を以下に示します。
| 元のデータ | 偶数から奇数の順に並べ替える | 奇数から偶数の順に並べ替える | ||
![]() | ![]() | ![]() | ![]() | ![]() |
この高度なソート機能の詳細については、こちらをクリックしてください。
今すぐ Kutools for Excel をダウンロードして、無料トライアルをお試しください!
メリット:追加の数式や列が不要で、シンプルなインターフェースから奇数/偶数条件による並べ替えを素早く実行でき、頻繁に使うユーザーに最適です。
考慮事項:Kutools はサードパーティ製のアドインでインストールが必要ですが、多くのユーザーから信頼され、Excel の機能を強化します。
デモ:Kutools for Excel で奇数または偶数で行を並べ替える
VBA コードを使用して奇数または偶数で行を並べ替える
奇数または偶数の値で数値を並べ替えるプロセスを自動化したいなら、VBA マクロが最も効率的な方法です。この方法は、マクロの基本知識があるユーザーに最適で、並べ替えを頻繁に繰り返す必要がある場合や、ヘルパー列を追加したくないとき、あるいはサードパーティ製のアドインに頼りたくないときに特に役立ちます。VBA を使えば、余計な手間をかけずにその場でスムーズに並べ替えが可能です。
1。開発>Visual Basicをクリックして、Microsoft Visual Basic for Applicationsウィンドウを開きます。「開発」タブが表示されていない場合は、Excel のオプションから有効化できます。VBA ウィンドウで挿入>標準モジュールをクリックし、次のコードをモジュールに貼り付けてください。
Sub SortByOddEven()
Dim ws As Worksheet
Dim rng As Range, cell As Range
Dim arr As Variant
Dim HelperArr() As Integer
Dim i As Long
On Error Resume Next
Set ws = Application.ActiveSheet
Set rng = Application.InputBox("Select the range to sort (single column):", "KutoolsforExcel", Type:=8)
If rng Is Nothing Then Exit Sub
arr = rng.Value
ReDim HelperArr(1 To UBound(arr, 1))
For i = 1 To UBound(arr, 1)
If IsNumeric(arr(i, 1)) Then
HelperArr(i) = arr(i, 1) Mod 2
Else
HelperArr(i) = 2 ' Non-numeric entries go last
End If
Next i
' Add helper column
rng.Offset(0, 1).Resize(UBound(arr, 1), 1).Value = Application.Transpose(HelperArr)
' Sort by helper column
ws.Sort.SortFields.Clear
ws.Sort.SortFields.Add Key:=rng.Offset(0, 1), SortOn:=xlSortOnValues, Order:=xlAscending
With ws.Sort
.SetRange rng.Resize(, 2)
.Header = xlNo
.Apply
End With
' Remove helper column
rng.Offset(0, 1).Resize(UBound(arr, 1), 1).Clear
MsgBox "Rows are sorted by odd (1) or even (0) numbers.", vbInformation, "KutoolsforExcel"
End Sub 2。F5キーを押すか、
ボタンをクリックしてマクロを実行します。表示される入力ボックスでデータ列を選択すると、マクロが自動的にデータを並べ替え、偶数を奇数の前にグループ化します(並べ替え順序によっては逆になる場合があります)。
注意点とトラブルシューティング:
- このマクロを複数列の範囲に適用する場合、選択した列とその隣接列のみが並べ替えられます。最良の結果を得るには、並べ替え対象の列だけを選択するか、高度な使用ケースではコードを調整して複数列の並べ替えに対応させてください。
- 誤ったデータ損失を防ぐため、マクロを実行する前に必ずワークシートを保存してください。
- エラーを回避するため、数値以外のエントリは末尾に移動されます。
メリット:完全自動化でヘルパー列が一切残らず、繰り返しタスクも瞬時に処理可能。
制限事項:マクロを有効化する必要があり、ある程度の VBA 経験が求められます。機密データに使用する際は、十分ご注意ください。
MOD 関数を使用して奇数または偶数を識別する
ISODD 関数のほかに、偶数と奇数を判別するには MOD 関数も活用できます。この方法は、標準的な数学演算に慣れている方や、特定の関数やローカライズ機能が搭載されていない古いバージョンのExcel をご利用の方にとって実用的です。MOD 関数を使うと、明確な数値による判定結果が得られます—偶数には0、奇数には1 が返されるため、並べ替え順序の制御や他の並べ替えワークフローとの統合がスムーズに行えます。
1。 数値の隣にある空白セル(たとえば B2)に、次の数式を入力してください:
=MOD(A2,2) この数式は、A2 セルの値を2 で割った余りを返します。偶数なら0、奇数なら1 が返されます。
2。この数式を下方向にコピーし、リスト内のすべての数値に適用します。
3。この補助列を使ってデータを並べ替えます(「データ」>「並べ替え」)。前述の補助列を使った方法と同様に、「最小から最大へ」で昇順に並べ替えると、すべての偶数(0)が奇数(1)の前に配置されます。
ヒント:
- データに整数でない値が含まれていても MOD 関数は動作しますが、0 または1 が意図通りに表示されるのは整数の場合のみです。
- この方法は言語や地域に依存せず、TRUE/FALSE の出力よりも明確です。
- 昇順と降順の並べ替えを切り替えるだけで、簡単に順序を変更できます。
関連記事:
Excel でメールアドレスをドメイン別に並べ替えるには、どうすればよいですか?
Excel でデータを最も頻繁に出現する値の順に並べ替えるには、どうすればよいですか?
Excel で取り消し線付きのデータを並べ替えたりフィルター処理したりするには、どうすればよいですか?
Excel で空白セルを上に持ってくるように行を並べ替えるには、どうすればよいですか?
最高の 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 日間のフル機能トライアル— 登録不要、クレジットカード不要
- 最高のお得感— 個別アドイン購入よりお得





