エクセルのマクロについて。 バージョンは2003です。

質問

携帯電話の発信明細書に氏名を、振り分けたいのですが、OCRで
明細書を読み取ったデータ（電話番号）をエクセルのマクロを使って
一発で氏名リストから、一致する番号に氏名を、振り分けるマクロプログラムは、どんな感じにしたら一番いいでしょうか？

登録リストは、1000人程あり、発信履歴は、500件程になります。

回答No.3

hallo-2007 · ベストアンサー

訂正します。
B1セルに　=Vlookup(A1，登録のシート!A:D，4，FALSE)
・・・
の部分を
=IF(COUNTIF(登録のシート!A:A,A1),VLOOKUP(A1,登録のシート!A:D,4,FALSE),"")
=IF(COUNTIF(登録のシート!B:B,A1),VLOOKUP(A1,登録のシート!B:D,3,FALSE),"")
・・・・
で検討してみてください。エラー処理必要でした。

お礼

解決いたしました。
ありがとうございました。

回答No.2

hallo-2007

明細書を読み取ったデータがシートに
　A　　　　B　　　C　　　D　　　E
電話番号
と500件あったら
B1セルに　=Vlookup(A1，登録のシート!A:D，4，FALSE)
C1セルに　=Vlookup(A1，登録のシート!B:D，3，FALSE)
D1セルに　=Vlookup(A1，登録のシート!C:D，2，FALSE)
E1セルに　=B1&C1&D1
入れて下フィルしておいて、B列、C列、D列を非表示にしておく
では如何でしょうか。

回答No.1

hallo-2007

>登録リストは、1000人程あり、発信履歴は、500件程になります。
登録リストがシートに
　A　　　　B
電話番号　氏名
・・・
1000人分

明細書を読み取ったデータがシートに
　A　　　　B
電話番号
と500件あったら
B1セルに　=Vlookup(A1，登録のシート!A:B，2，FALSE)
と入れて下までコピイします。

補足

指導ありがとうございます。

登録リストに

　　Ａ　　　　　Ｂ　　　　　Ｃ　　　　　Ｄ
電話番号１　電話番号２　電話番号３　　氏名

とゆう感じにあった場合どんな感じになりますか？