1427119477 こんばんは。

いつもお世話になります。今回も宜しくお願いいたします。
エクセル2013をつかっています。添付画像のような表をつくりまして左右に別れたデーターの氏名をあいうえお順に並べ変えようとおもいますけどもどのような手順ですればいいでしょうか?また左右のデーターを50音順に並べ替えたのちに型番1・2・3ごとに個数をカウントして表示もしたいと思います。お忙しい中、宜しくお願いいたします。

回答の条件
  • 1人1回まで
  • 登録:
  • 終了:2015/03/25 22:40:10
※ 有料アンケート・ポイント付き質問機能は2023年2月28日に終了しました。

回答2件)

id:rafting No.1

回答回数2652ベストアンサー獲得回数176

ポイント250pt

1.まず、31番以降を左側へ移動させる。
2.担当の列で並び替える。
3.ふりがなを表示させて確認する。
4.ふりがなの間違っている所を修正する。
以上、2~4は、http://wol.nikkeibp.co.jp/article/column/20100922/108661/?rt=nocntを確認しながらやってみてください。
5.countif関数を使って型番項目のそれぞれの型番毎の個数を求める。
http://www.excel-list.com/countif.htmlを参照のこと。

id:dejavu888i

どうもありがとうございました。助かりました。またお願いいたします。

2015/03/25 22:41:05
id:gizmo5 No.2

回答回数504ベストアンサー獲得回数141

ポイント50pt

表がB2からM32の範囲にあるとします。
以下の処理をマクロで実行すると、並び替えを実行します。

Sub 並べ替え処理()
    Range("I3:M24").Select
    Selection.Cut
    Range("C33").Select
    ActiveSheet.Paste
    Range("C3").Select
    Range("C3:G54").Select
    ActiveSheet.Sort.SortFields.Clear
    ActiveSheet.Sort.SortFields.Add Key:=Range("G3:G54") _
        , SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
    With ActiveSheet.Sort
        .SetRange Range("C2:G54")
        .Header = xlYes
        .MatchCase = False
        .Orientation = xlTopToBottom
        .SortMethod = xlPinYin
        .Apply
    End With
    Range("C33:G54").Select
    Selection.Cut
    Range("I3").Select
    ActiveSheet.Paste
End Sub

先ほどと同じ前提ですが、型番がC列とI列にあって3行目から32行目までを使っているとします。
型番1の個数は、以下の式をセルに設定してください。

=COUNTIF(C3:C32,1)+COUNTIF(I3:I24,1)

同様に、型番2、型番3は以下の式になります。

=COUNTIF(C3:C32,2)+COUNTIF(I3:I24,2)
=COUNTIF(C3:C32,3)+COUNTIF(I3:I24,3)
id:dejavu888i

丁寧に説明して頂きありがとうございました。また宜しくお願いいたします。

2015/03/25 22:42:19

コメントはまだありません

この質問への反応(ブックマークコメント)

「あの人に答えてほしい」「この質問はあの人が答えられそう」というときに、回答リクエストを送ってみてましょう。

これ以上回答リクエストを送信することはできません。制限について

回答リクエストを送信したユーザーはいません