エクセル2000 自動表示

質問

社員の情報がデータとしてあります。
別シートへ部長の番号を入力すると、部下情報の必要な部分が表示される
方法を教えてください。

【社員データ】
　　　A　　　　　B　　　　C　　　D　　　E　　　　F
1　社員番号　氏名　年齢　部署　　部長　部長番号　　
2　　11　　　　山田　　26　　山　　　川田　　111　
3　　12　　　　山本　　27　　川　　　東　　　222　
4　　13　　　　山川　　27　　山　　　川田　　111

【別シート】部長番号を入力すると・・・
部長番号　社員番号　氏名　　部署
　111　　　　　11　　　　山田　　山
　111　　　　　13　　　　山川　　山
　222　　　　　12　　　　山本　　川

膨大なデータの為、オートフィルタは使用しない方法でお願い致します。

回答No.2

mitarashi

オートフィルタも使えないほど膨大との事ですので
ADOでワークシートに接続して抽出する方法
http://home.att.ne.jp/zeta/gen/excel/c04p01.htm

VBAに堪能でない／SQLなんて知らないという場合は、
データベースクエリにより、ワークシートから抽出する方法
http://www.eurus.dti.ne.jp/~yoneyama/Excel/filter2.htm

などがあります。ご参考まで。

お礼

ご回答ありがとうございました。
大変助かりました。
しかも＞VBAに堪能でない／SQLなんて知らないという場合は、
などとずばりなことで、大変ありがたかったです。

早速試したいと思います。とりあえずお礼まで。

回答No.1

hallo-2007

【社員データ】
　　　A　　　　　B　　　　C　　　D　　　E　　　　F
1　　作業列　社員番号　氏名　年齢　部署　　部長　部長番号　　
2　　　　　　　11　　　　山田　　26　　山　　　川田　　111　
3　　　　　　　12　　　　山本　　27　　川　　　東　　　222　
4　　　　　　　13　　　　山川　　27　　山　　　川田　　111

【別シート】
　　　A　　　　B
1　部長番号　　111　
2　社員番号　氏名　　部署
3　　11　　　　山田　　山
4　　12　　　　山本　　川
ということで
作業列には　=IF(別シート2!B$1=G2,ROW(),"")　下フィル
別シートの
A3に　=VLOOKUP(SMALL(社員データ!A:A,ROW(A1)),社員データ!A:F,2)
B3に　=VLOOKUP(SMALL(社員データ!A:A,ROW(A1)),社員データ!A:F,4)
・・・下フィル
では如何でしょうか。
＊エラー処理なしです。

お礼

ご回答ありがとうございました。
大変助かりました。

早速処理したいと思います。とりあえずお礼まで。