プロが教える店舗&オフィスのセキュリティ対策術

エクセルで
A   B   C     A    B   C
山田 鈴木  小林    山田  山田 
鈴木 長谷川 藤田    鈴木  鈴木  鈴木
佐藤 山本  鈴木    佐藤  佐藤 
田中 佐藤  田中  → 田中  田中  田中
小林 山田  山本    小林      小林
藤田           藤田      藤田
長谷川          長谷川 長谷川
山本           山本  山本  山本

というように並び替えたいんですが、どうすればいいですか?
あまり関数は詳しくないんですが、教えてください。

教えて!goo グレード

A 回答 (2件)

こんにちは!



別列表示で良いのでしょうか?

仮にB・C列をD・E列に表示する場合は
D1セルに
=IF(COUNTIF(B:B,$A1),$A1,"")

という数式を入れ隣りのE1セルまでフィル&コピー → そのまま下へフィル&コピー!

こんな感じではどうでしょうか?

※ そのままB・C列に表示したい場合は関数では無理なのでVBAになります。
一例です。

Sub Sample1()
Dim i As Long, j As Long
Dim myStr As String

For j = 2 To 3
For i = 1 To Cells(Rows.Count, j).End(xlUp).Row
myStr = myStr & Cells(i, j) & ","
Next i
Columns(j).ClearContents
For i = 1 To Cells(Rows.Count, "A").End(xlUp).Row
If InStr(myStr, Cells(i, "A")) > 0 Then
Cells(i, j) = Cells(i, "A")
End If
Next i
myStr = ""
Next j
End Sub

※ 関数・VBAどちらにしてもA列にないデータがB・C列にあっても
表示されません。m(_ _)m
    • good
    • 1
この回答へのお礼

出来ました!!
なんか感動です!
手作業でやってたら時間もかかるし、絶対にミスが出ると思っていたので
本当に助かりました。
VBAのほうもぜひ参考にさせて頂きます!
ありがとうございましたm(_ _)m

お礼日時:2018/05/17 10:45

並べ替えにルールはありますか?


「山田」が先頭で「山本」が最後尾なのは何故でしょう?

並べ替えの順番表があるとか?
元の表のA列が基本?
    • good
    • 0
この回答へのお礼

A列が基本です。
よろしくお願いします。

お礼日時:2018/05/16 11:08

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています

教えて!goo グレード

このQ&Aを見た人がよく見るQ&A

人気Q&Aランキング