本記事では、Sortメソッドの使い方や注意点、実際の活用例について詳しく解説します。

ぜひ参考にしてください。
それでは見ていきましょう！

⬛︎こんな事ができるようになる！

・Excelのセル内のデータを昇順や降順に並び替えることができる
・特定の範囲や複数範囲のデータを正確に整理できる

⬛︎忙しい人向けのコピペ用ソースコード

Sub Sortsample()
'xlAscending:昇順　lDescending：降順
Range("並び替えたい範囲").Sort Key1:=Range("A1"), Order1:=xlDescending
End Sub

並び替えたい範囲はカスタムして使用してください。
Order1には「xlAscending:昇順」または「xlDescending：降順」を当てはめてください。

⬛︎構文の説明

まず、使用するメソッドについてです。使用するのは「Sortメソッド」になります。
Sortメソッドの基本的な構文は以下の通りです。

昇順・降順で並び替え

・昇順で並び替え

まず、昇順で並び替えをしてみましょう。
下図の見本をご覧ください。

A1からA10のセルに文数値が入力されてあります。
こちらを昇順に並び替えてみたいと思います。

では再度構文を見てみましょう。

⬛︎単一範囲と複数範囲の並び替え

以下では、単一範囲と複数範囲の並び替えの方法を説明します。

・単一範囲の並び替え

まずは単一範囲の並び替えの方法です。先ほど紹介してきたソースコードと同じですね。
以下のソースコードをご覧ください。

このソースコードでは、A1からA10の範囲をA1を基準に昇順で並び替えています。

必要に応じて、範囲や基準セル、並び順を変更してください。

・複数範囲の並び替え

次に、複数範囲の並び替えの方法です。以下のソースコードをご覧ください。

このソースコードでは、A1からB10の範囲を、A列を基準に昇順、B列を基準に降順で並び替えています。

必要に応じて、範囲や基準セル、並び順を変更してください。

⬛︎よくあるエラーと対処法

VBAのソートに関連するよくあるエラーのいくつかとその対処法を説明します。

1. “実行時エラー ‘1004’:ソートする範囲が正しくありません

このエラーは、ソート範囲が正しく指定されていない場合に発生することがあります。
ソートする範囲がデータが含まれているセル範囲でなければなりません。

対処法
 ソートするデータが正しく指定されていることを確認します。
 ソートする範囲が正しく指定されているか、データが含まれているセルを選択しているかを確認します。

2. “実行時エラー ‘438’:オブジェクトはこのプロパティまたはメソッドをサポートしていません

このエラーは、ソートを実行しようとするオブジェクトがソートメソッドをサポートしていない場合に発生することがあります。
たとえば、ソートしようとするオブジェクトがWorksheetオブジェクトではない場合にこのエラーが発生することがあります。

対処法
ソートメソッドを使用する前に、正しいオブジェクトを参照していることを確認してください。
ソート対象のデータが含まれているWorksheetオブジェクトを適切に指定していることを確認します。

3. “実行時エラー ’91’:オブジェクト変数または With ブロック変数が設定されていません

このエラーは、オブジェクト変数が設定されていない状態でソートを実行しようとした場合に発生することがあります。
ソートするデータを含むオブジェクトが正しく設定されていない可能性があります。

対処法
ソートを実行する前に、ソート対象のデータを含むオブジェクトを正しく設定していることを確認します。
必要に応じてオブジェクトを初期化し、適切に設定してからソートメソッドを呼び出します。

■練習問題

練習問題も別の記事でまとめているので是非参考にしてみてください！

⬛︎公式の説明

わかりやすいように説明したため公式と使用する語句が異なりますが
マイクロソフト公式の説明については下記のリンクを参照してください。☟

⬛︎まとめ

いかがだったでしょうか？

以上がマクロVBAでのセルの並び替え（sort）についての紹介でした。

Sortメソッドを使用することで、Excelのデータを効率的に整理することができます。

セルの並び替えは、範囲や基準セル、並び順を適切に指定することで正確な結果を得ることができます。

ソースコードの見本を参考にしながら、自身のデータに応じた並び替えを行ってみてください。

それでは次回の記事でお会いしましょう。

練習問題と内容について

・練習問題の狙い

このシリーズでは課題を元にマクロVBAを実践することでスキルを身につけることが出来ます。

正直、ソースコード作成については実践あるのみです！

答えのコードについては数例挙げますが、「もっといい答えがある」などの意見があれば

問い合わせから連絡ください！  

こんな問題を作ってほしいなどの意見もお待ちしております！

・練習問題14について

こちらはマクロVBAの知識で少し発展した課題になります。

指定されたセルの数値を元に、数値を昇順に並び替える練習問題となります。

それでは頑張っていきましょう！

練習問題の内容と動作説明

問題内容

セル番地A1からA10までの数値を昇順に並び替える

動作説明

VBAを使用して、セル番地A1からA10までの数値を昇順に並び替えます。

この問題では、セルA1からA10までの数値を取得し、その値を昇順に並び替えて元のセルに格納する必要があります。

ヒント

以下のヒントを参考にして解答コードを作成してみてください。

・ヒントその1

数値の並び替えには、セル範囲の取得とソートが必要です。

セル範囲を取得するには、Rangeオブジェクトを使用します。
例えば、セルA1からA10までの範囲を取得するには、Range(“A1:A10“)というように範囲を指定します。

・ヒントその2

セル範囲を並び替え・ソートするためには、Sortメソッドを使用します。

Sortメソッドは、Rangeオブジェクトに対して呼び出すことができます。
例えば、Range(“A1:A10”).Sortというように呼び出します。

・ヒントその3

ソートする際の基準を指定する必要があります。

昇順に並び替える場合は、Sortメソッドの引数でOrder1パラメータにxlAscendingを指定します。
例えば、Range(“A1:A10”).Sort Order1:=xlAscendingというように指定します。

以上のヒントを参考に課題に取り組んでみてください！

解答コード

では回答を見ていきましょう！

・回答その①

上記のコードは、セル範囲A1からA10までの数値を昇順に並び替えるVBAのマクロです。

それでは実行してみましょう。
結果はこのようになります。

昇順に並び替えることができていますね。

Range(“A1:A10”)でセル範囲を指定し、.Sortメソッドを呼び出してソートを行っています。

Key1パラメータにはソートの基準となるセルを指定しており、ここではA1を指定しています。
Order1パラメータにはソートの順序を指定し、xlAscendingを指定することで昇順に並び替えています。

・回答その②

必要な知識

この問題を解くためには、以下の基本的な知識が必要です。

ソートの方法

セル範囲のソートには、Sortメソッドを使用します。

Sortメソッドは、Rangeオブジェクトに対して呼び出すことができます。
ソートの基準となるセル範囲やソートの順序を指定することができます。

まとめ

この練習問題では、VBAを使用してセル範囲の数値を昇順に並び替える方法について学びました。

具体的には、セル番地A1からA10までの数値を昇順に並び替える問題を解きました。

この問題を解くためには、Rangeオブジェクトとそのメソッドを使ってセル範囲を取得し、Sortメソッドを使用して数値をソートしました。

VBAを使うことで、Excelの操作を自動化したり、複雑な処理を行ったりすることができます。
練習問題を通じて、VBAのスキルを向上させ、より高度な操作や処理を行えるようになることを目指しましょう。

以上で練習問題14となります。お疲れ様でした！

データが多ければ行数も増えるため、値が小さい項目はまとめたい所です。

しかしピポットテーブルの通常の機能にはその他の項目は存在しません。
それでも関数を合わせることで同じ機能を持たせることができます。

使う関数も簡単なのでぜひ活用してみてください。
それでは見ていきましょう。

■見本のピポットテーブルについて

今回使用する見本のデータとピポットテーブルを見てみましょう。
見本は下図になります。

項目としては「日時」「曜日」「商品」「単価」「個数」「合計金額」になります。
このデータをピポットテーブルに落とし込んだのが右側になります。

では実際にその他を出してみましょう。

■ピポットテーブルでその他を表示する

では実際にその他を表示させてみましょう。

手順は以下の通りです。

①行の統計付きで並び替えたい順に並び替える
②その他以外の項目を表示させる
③その他の項目を作成する

では１つずつ見ていきましょう。

・①行の統計付きで並び替えたい順に並び替える

まず行の統計付きで並び替えたい順に並び替えましょう。
なぜ行の統計付きなのかというと③のその他を計算するときに必要になります。

そして今回は個数の合計の降順で並び替えてみました。
合計の大きい順ですね。

並び替えする方法についてはこちらから☟

【ピポットテーブル④】行・列ラベルの降順・昇順・その他の並び替えオプション・手動の並び替えについて ► 独学エクセル塾 (dokugakuexcel.com)

なので今回は個数が多い上位○○位を表示させて、それ以外をその他で表示します。

では次のステップです。

・②その他以外の項目を表示させる

次にその他以外の項目を表示させたいと思います。
問題はどこに表示させるのかですが、表示させるのはピポットテーブルでなく、通常のセルになります。

では見本を見ていきましょう。

まず項目を表示させます。

参照させるのはピポットテーブルの項目のセル番地を「＝」で参照します。

フィルダウンで全項目参照してください。

今度は上位○○位の表示についてです。
今回は上位5位までは表示させるようにしましょう。

参照先は先ほどと同様にピポットテーブルから参照します。

注意点としてピポットテーブル内のデータを「＝」からクリックで参照しようとすると
下図のような参照式になってしまいます。

これではピポットテーブルの変化に対応できなくなるので「＝AF6」といった
セルの番地で参照するようにしてください。

あとはその他の項目を作成するだけです。

・③その他の項目を作成する

最後にその他を追加してみましょう。
まず手入力で最終行に「その他」を打ち込みます。
こちらは任意なのでどのような文字でも構いません。

では、バナナのその他を求めてみましょう。
入力する関数は下記の通りです。

=MAX(AF:AF)-SUM(AM6:AM10)

では仕組みを紹介します。
まずMAX関数で「MAX(AF:AF)」のように対象の行の最大値を求めます。

MAX関数についてはこちらから☟

【MAX関数】エクセルで範囲を指定して、数値の最大値を求める方法について ► 独学エクセル塾 (dokugakuexcel.com)

ここでの最大値は統計の値になりますので「31」となりますね。
後はこの「31」から「SUM(対象範囲)」でその他以外の合計を引けばその他の項目の完成です。

SUM関数についてはこちらから☟

【SUM関数】エクセルで範囲を選択し、合計（総和）を関数を使用して求める方法 ► 独学エクセル塾 (dokugakuexcel.com)

今回のその他以外の項目は「AM6からAM10」なので「SUM(AM6:AM10)」を引きます。

結果はこちら。

バナナの項目のその他ができました。
後はフィルダウンで全てのその他を表示させてみましょう。

ついでに見栄えを良くしましたがこれでその他の完成です。

■動作確認

この方法は実際にピポットテーブルで表示していないので
スライサーやフィルターの機能を満たしていないように思えますが参照しているのはピポットテーブルのセル番地なのでピポットテーブルに合わせて変化してくれます。

■注意点

・統計の最大値の算出について

この方法では統計値のMAX値を列参照で求めていました。
しかし同列に別のピポットテーブルまたはデータがあった場合、もしそちらの数値が大きい場合は
最大値が変化してしまい、算出結果にずれが生じてしまいます。

なので参照範囲をカスタマイズするか、同列にデータが無いように管理する必要があります。

・フィルターによる項目数の変化について

先ほどの見本では上位5位を表示させ、それ以外をその他としました。
しかし、フィルターで絞り込んだデータが５つ以下の場合、項目がずれてしまいます。

なので項目の数が変化するリスクがある場合は「IF関数」などで「参照データが無ければ空白」にしたり、
条件付き書式でデータが無ければ、塗りつぶしで見えなくするといった工夫が必要になります。

IF関数についてはこちらから☟

【IF関数】エクセルで○○だったら△△を表示する～条件分岐を身に着ける～ ► 独学エクセル塾 (dokugakuexcel.com)

条件付き書式についてはこちらから☟

【条件付き書式】必見！使用方法や設定方法を詳しく説明～ルールの追加・編集・削除・優先順位～ ► 独学エクセル塾 (dokugakuexcel.com)

とはいいつつも、項目が増えることはないのでその他の算出はできます。

■まとめ

いかがだったでしょうか。
現時点でピポットテーブルにその他の機能は存在しませんが
本記事でその他の表示が可能になります。

フィルターの変化にも対応できるので是非参考にしてみてください。
それでは次回の記事でお会いしましょう。

今回の記事ではピポットテーブルの行・列ラベルの並び替えについてまとめています。
日付や時間、数値などの行・列ラベルを降順・昇順に並び替えることができる便利な機能です。

分析をする際にも並び替えにより分析しやすくする必要がありますね。

その他の並び替えオプションや手動での並び替えも説明していますので是非参考にしてみてください。

前回の記事はこちらから☟

【ピポットテーブル③】データの個数や値の合計・累計の表示など「値フィールドの設定」について ► 独学エクセル塾 (dokugakuexcel.com)

それでは見ていきましょう。

■行・列ラベルをもとにした並び替え

まずは行・列のラベルをもとにした並び替えについてです。
今回も果物屋の売り上げを参考に見ていきましょう。

行ラベルには日付、列ラベルには商品の項目があります。
まずは行ラベルから並び替えしてみましょう。

・行ラベルの並び替え

「行ラベル」の右側に印があると思います。
ではそちらを左クリックしてみましょう。

すると下図のようなメニューが表示されると思います。

メニューの上部に「昇順」「降順」の項目があります。
昇順・降順を選択した際の結果を見ていきましょう。

昇順は行ラベルの日付が古い方から並び替えしており、
降順は日付が新しい順に並び替えができました。

もちろん、データも行ラベルに合わせて並び替えてくれます。

・列ラベルの並び替え

「列ラベル」の右側にも印があると思います。
ではそちらを左クリックしてみましょう。

すると下図のようなメニューが表示されると思います。

メニューの上部に「昇順」「降順」の項目があります。
昇順・降順を選択した際の結果を見ていきましょう。

昇順は「バナナ」「みかん」「メロン」「りんご」の順ですが
降順は「りんご」「メロン」「みかん」「バナナ」の順になってますね。

項目名が数値や日時ではないため、50音順での昇順・降順の並びになってます。
もちろん、項目名が数値や行ラベルの日時である場合はその項目にあった昇順・降順の
並び替えになってくれます。

■その他の並び替えオプション

先ほどは行ラベル・列ラベルを元に並び替えをしましたが
今回はその他の並び替えオプションについて紹介します。

行ラベルからでも列ラベルからでもその他の並び替えオプションは選択できますが
今回は行ラベルから「その他の並び替えオプション」を選択してみましょう。

では行ラベルの並び替えのボタンを押してメニューを表示し、「その他の並び替えオプション」を左クリックを押してください。

すると下図のような画面が出てきたと思います。

選択できるオプションとして「手動」「昇順」「降順」が選択できます。
今回は見本で降順を選択しました。

さらに「日時」と「合計/個数」が選択できるようになってます。

今回は行ラベルから「その他の並び替えオプション」を選択したので
行フィールドの「日時」、値フィールドの「合計/個数」の2つを選択できるようになっている仕組みです。

つまり、列ラベルから選択すると、「商品」「合計/個数」の2つが選択できます。

もちろん、項目を追加するとその追加した項目を選べるようになります。

では「降順」で「合計/個数」を選択してみましょう。
ピポットテーブルはこのようになります。

変更後の総計を見てください。変更後は右側のピポットテーブルになります。
総計が降順になっていますね。
こちらは「降順で合計/個数」を選んだので「合計/個数」の結果となる「総計」を降順で並び替えたという意味です。

■手動で並び替え

これまでは降順・昇順で並び替えましたが
手動でも並び替えることが可能です。

下図のピポットテーブルをご覧ください。　

バナナが最終列にありますね。
こちらを手動で先頭列に並び替えていきたいと思います。

方法として「バナナ」をクリックして、緑の枠を再度クリックします。
そしてクリックしたまま、先頭列まで移動させます。
下図のようになりますね。りんごの左列まで緑の線を持っていき、クリックを離してください。

結果はこのようになります。

バナナが先頭列になりました。
値も追従して並び替えてくれます。

■まとめ

いかがだったでしょうか。
今回は行・列ラベルの並び替えてのほかに
その他の並び替えオプションや手動での並び替えを見ていきました。

次回は値フィルターの機能を見ていきたいと思います。

フィルターの記事はこちらから☟

【ピポットテーブル⑤】値フィルターを使用して設定した数値以上・以下・範囲で絞り込む ► 独学エクセル塾 (dokugakuexcel.com)

では次回の記事でお会いしましょう。