エクセルの並び替え（マクロ・・・？）

質問

・Ａ列に店の名前
・Ｂ列に「今年」・「前年」の文字
・Ｃ列に売上

今年と前年の売上を店ごとにわかる状態です。
つまり、Ａ列には同じ店名が２つ存在します。
例

　　Ａ..............Ｂ................Ｃ
高島屋　　今年　　　９００
高島屋　　前年　　　８００

といった感じです。

これを、今年の売上の高い方から並び替えたいです。
このとき、前年の売上と比較できるように、前年のも今年の下のセルに表示したいのです。単純にＣ列だけを並び替えすると、前年とごちゃまぜになってしまいますし、店名もバラバラです。店名が２つ連続した状態で、尚且つ　今年の下のセルに前年がくるように、かつ今年の売上の高い方から並び替えることはできないでしょうか？

そもそも前年・今年といったものを行ではなく、列にすればよかったのですが、すでに作ってしまった後でした、、、。
多量のデータなので、なんとか解決させたいです。

ＶＢＡやマクロになるのでしょうか？　サンプルコードを記載してくれると非常に助かります。

回答No.2

pauNed · ベストアンサー

こんにちは。
もし、現状が規則正しく下記のように並んでいるなら

　　　Ａ　　　　Ｂ　　　　Ｃ
１　店名　　　　年　　　売上
２　高島屋　　今年　　　９００
３　高島屋　　前年　　　８００
４　伊勢丹　　今年　　　９００
５　伊勢丹　　前年　　　９００
：

D2セルに
=IF(B2="今年",C2,D1)
と式を入力して以下必要行数コピー。
必要ならD列の式を数値化します。
（D列選択して[コピー]-[形式を選択して貼り付け]「値」）

このＤ列を第１優先で降順
Ｂ列を第２優先で昇順 で並び替え。

というように、作業列を使えば比較的簡単です。
元の順番に復元する必要もあるなら、
並び替え前にＥ列にでも連番を振っておけば良いかと思います。

回答No.5

imogasi

修正ソートキーが空きの列の一列必要ですね。
まず同じ高島屋が連れもて動くように、全円も今年も同じキー（今年売上額）を持つようにすることを考えます。
例データ
Ａ２：Ｃ７
c 去年 2000
a 今年 1000
b 去年 800
a 去年 900
b 今年 1200
c 今年 2200
Ａ列（第１）Ｂ列（第２）でソート
Ａ２：Ｃ７
Ａ列　　　Ｂ列　　Ｃ列　　
a 去年 900
a 今年 1000
b 去年 800
b 今年 1200
c 去年 2000
c 今年 2200
Ｄ２に
=IF(B2="今年",C2,SUMPRODUCT(($A$2:$A$100=A2)*($B$2:$B$100="今年")*($C$2:$C$100)))
と入れて下方向に複写。
結果
Ａ２：Ｄ７
Ａ列　　Ｂ列　　　Ｃ列　　　Ｄ列
a 去年 900 1000
a 今年 1000 1000
b 去年 800 1200
b 今年 1200 1200
c 去年 2000 2200
c 今年 2200 2200
Ｄ列（降順）、Ｂ列（降順）でソート
（ソートの場合、一般には、ソートキーのＤ列の式を消してソートを考えたほうが良いが、今回はたまたま不要である）
結果
c 今年 2200 2200
c 去年 2000 2200
b 今年 1200 1200
b 去年 800 1200
a 今年 1000 1000
a 去年 900 1000

回答No.4

mozomozo123

今年のデータが必ず上にあるのであれば、D列2行に以下のように設定します。

=IF(B2="今年",C2,C1)

で、並び替えで、D列降順、A列、B列昇順（今年が上に来るようにB列は設定する）

後はD列非表示でOK。

ようはD列に今年の数値のみをコピーさせるわけです。
そうすればD列並び替え、でA列を指定すれば店順になるでしょ。

回答No.3

pauNed

ぁ、ごめんなさい。#2です。
売上が同額の場合考慮し
Ｄ列を第１優先で降順
Ａ列を第２優先で昇順
Ｂ列を第３優先で昇順で並び替え。
です。m(_ _)m

回答No.1

fake-tang

データ→並べ替え
で、三つまで並べ替えの条件を指定できます。
それで並べ替えればいいのでは。

お礼

回答ありがとうございます。

データ→並べ替え
の方法も試しましたが無理でした。
店名を連続で表示させるためには、まず店名を第一優先しなければなりませんが、それでは売上の高い順にはなりません。
仮に売上を第一優先し、店名を第二優先しても、店名が連続で表示されるとは限らないからです。

表の作り方に問題があると言われればお終いなのですが、皆様お知恵を貸して下さい！！！お願いします！！