エクセル2000での一致・不一致

質問

エクセル2000での質問です。
ＡとＢのファイル(表の形式は全く同じ)があるとします。
ＡとＢを比較して”Ａに対してＢのＸＸのデータが合わない”等が分かるようにできろのでしょうか？
例）ファイルＡ　　ファイルＢ
　　1　　　　　　　1
　　2　　　　　　　2
　　3　　　　　　　5
ならば、Ａには”5”がなくてＢには”3”がない事を抜き出すなり、別表にするなりの、何らかの方法で分かるようにしたいのですが・・・。

回答No.4

nishi6

＞照合したいデータ同士が順不同で並んでいた場合や、
＞ファイルAとファイルBのデータの数が違ってもこの方法は可能ですか？

セル単位で比較しているだけですから基本的には可能です。
回答した方法は算式の貼り付け位置を、何か入力してある場所に限定しようとしていますので、ファイルＣに多めに貼り付ければいいでしょう。
例えば、ファイルＡはA1:B500、ファイルＢがB2:C600を使っていれば、A1:C600に貼り付ければ違いを表示します。

お礼

いろいろとありがとうございました。
結局、Accessで取り込んだ後、不一致クエリで処理することにしました。
もともと片方のファイルはAccess→Excelへ書き出したものだったので・・・。
普段Accessしか使っていないので、どうもExcelにはなじめませんでした。

回答No.3

bin-chan

「統合」を利用してはどうでしょう？

多少データ構成が変わりますがご容赦ください。
１．ファイルＡをシート１に読み込みます。
２．列Ａのみではできないので列Ｂに「１」をいれ、Ａの行数全部にコピーします。
３．タイトルを以下のようにします
列Ａ＿列Ｂ
1 ＿ 1
2 ＿ 1
3 ＿ 1
こんな感じ（アンダースコアがセルの区切りとさせてください）
４．ファイルＢをシート２に読み込みます。
５．ほぼ同様の処理でタイトルを以下のようにします（列Ｂは２を入力）
列Ａ＿列Ｂ
1 ＿ 2
2 ＿ 2
5 ＿ 2
６．シート３でセルＡ１を選択し、メニュー[データ]-[統合]をクリック。
７．「集計の方法」は「合計」
８．「統合元」でシート１のセルＡ１からＢ４を選択し「追加」ボタンクリック。
９．「統合元」でシート２のセルＡ１からＢ４を選択し「追加」ボタンクリック。
１０．「統合の基準」で「上端行」「左端列」にチェックを入れる。
１１．「ＯＫ」ボタンクリック。
１２．シート３のＡ列に「コード」が、Ｂ列に「値」が入ります。

「値」が３の場合、ファイルＡ、ファイルＢともに存在するコードです。
「値」が１の場合、ファイルＡにのみに存在するコードです。
「値」が２の場合、ファイルＢにのみに存在するコードです。

もうちょっと綺麗にできる方法がありそうですけどね。

回答No.2

imogasi

ファイルというのは、エクセルではBOOKを保存した時に記録される形式だと認識しています。
１ブック１シートのブックに限る制約が有るようですが、
PRN形式で（スペース区切りで）Book1.prnとBook2.prnにシートのテキスト内容だけを保存したとします。VBEのModule1の画面に
Sub test1()
Open "book1.prn" For Input As #1
Open "book2.prn" For Input As #2
While EOF(1) = False
Line Input #1, a$
Line Input #2, b$
If a$ <> b$ Then
MsgBox a$
MsgBox b$
End If
Wend
Close #1, #2
End Sub
を入力して実行すれば、違うものはMｓｇBoxに表示されます。
MsgBoxの部分をファイルに書き出すように書きなおせば、エクセルに再読み込みできてわかりやすく表示されるでしょう。
上記は旧DosBasicスタイルそのままで、識者はお笑いになるでしょうが、根本はファイルマッチングすれば良いと思ったので投稿しました。

補足

照合するデータ同士が順不同で尚且つデータ数が違う場合でも可能でしょうか？

回答No.1

nishi6

マニュアルで比較する方法を考えてみました。

ファイルＢをコピーしてファイルＣとしておきます。ファイルＣに照合結果を書いてみます。

ファイルＡ、ファイルＢ、ファイルＣを全て開きます。

ファイルＡ、ファイルＢのSheet1を照合する例です。
シートが複数あっても同様な手順を繰り返すだけです。

ファイルＣのセルA1が空いている（未入力）とします。(A1が空いてなければ他を探します)
　A1に

　　=IF([Book1]Sheet1!A1=[Book2]Sheet1!A1,"","違う "&ROW()&":"&COLUMN())　

　を入力します。A1に書き込むのでSheet1!A1のようにA1にします。
　$A$1のように絶対番地参照になったら『$』を削除して下さい。

　上の算式では、ファイルＡを『Book1』、ファイルＢを『Book2』としています。

（１）A1をコピーします。
（２）メニューから、編集→ジャンプ→ジャンプのダイアログでセル選択ボタン→定数　を選択してＯＫ。

これで定数のセルが選択されたはずなので、Ctrl-V(貼り付けを実行)
ファイルＡ、ファイルＢの対応するセルの内容が違えば『違う 行番号:列番号』が表示されます。

（２）で定数セルだけか、他に算式のセルがあるか分かりませんが、算式を選択する場合は、ジャンプのダイアログでセル選択ボタン→数式　を選択してＯＫを押します。

上記は、セルに入力された場所に比較の算式を埋め込もうとしていますが、操作が複雑なら、ファイルＣのA1の算式をファイルＣの入力がある範囲にテキトーに貼り付けてみて下さい。

相違点は、
　（ア）目で確認するか、または
　（イ）算式の値をコピーして値として貼り付けしてソートする。または
　（ウ）フィルタ→オートフィルタで空白以外のセル　を表示
等で簡単に見つけることができるでしょう。

ご参考に。

補足

照合したいデータ同士が順不同で並んでいた場合や、ファイルAとファイルBのデータの数が違ってもこの方法は可能ですか？