回答の混乱は
>Aというシートに大量の人名がリスト化されています。
のブック名は?
Aシートの具体的シート名は?
>新たに別のシートで人名のリストが手に入りました
既にExcelのデータ化されているのか。紙に書かれたリストのデータでこれから入力するのか。多分電子データ化は済んでいるらしいが。
別のブックの(従って別の)シートのことか。
そのブック名は?
そのデータが入ったシートの具体的シート名は?
を書かないと具体的な回答が出来ない。
ーーー
関数でやるなら
Match関数。
VLOOKUP関数
COUNTIF関数
などを使うべきと思う。
その際>Aのリストと新たなリストは形式が異なっていて
だと意外に難しさがある場合があるので具体例的に説明が必要。
全般的に具体例が書いてないのは、まずい。
ーーー
抜き出すとなると作業列が必要になったりする。関数では難しい。
ーー
>試してみましたが、うまくいきませんでした。
「Aシート」の部分には「シート名」+「シート」とすればいいですか?
この辺は質問者はわかっている・類推できるものとして、回答者は回答する。
>「A:A」の部分でA列全体という意味ですか?
と聞いたりしているところから、本来この課題は今の質問者には過ぎた課題でしょう。
ーーー
>Bのリストには、名字の列しかないということです。
それでは、苗字だけで同じと思われる人を抜き出すのか。
ーーー
大量というが何人ぐらいか?
ーーーー
一案は
Aシートについて、名前にフリガナを負って見る。
Excelに直接入力してないデータだとフリガナが取れない場合がある。
A列 B列
加藤 カトウ
木村 キムラ
大石 オオイシ
清水 シミズ
小和田 オワダ
上記は私は、A列はメモ帳から張り行けた。
B列は下記コードを標準モジュールにコピペして実行。これで振り仮名が振れる。ただし導出された読みが完全ではない場合がある。例えばコワダと読む場合である。チェックと訂正が必要。
名前も入っていれば、名前にもフリガナが振られる。
Sub test01()
d = Range("A65536").End(xlUp).Row
For i = 1 To d
Cells(i, "B") = Application.GetPhonetic(Cells(i, "A"))
Next i
End Sub
元データ氏名はA列、フリガナはB列に出す例ですから、実情で適当に修正のこと。
ーー
これでフリガナ列でソートし印刷する。
その印刷シートを見ながら、同一人か1つずつチェックしていくのが、質問者には相応しいやり方なのでは。
お礼
私のレベルに合わせた解決方法を 詳しく解説いただき、ありがとうございました! はい、確かに私には難しい課題かもしれません。 エクセルの本を買ってこうようと決めたところであります。 質問する前に必要な情報を提供できるぐらいは 勉強しておかなければいけませんね。 回答、説明、誠にありがとうございました。