Sheet1
A B C D E F G H
1 郵便番号 住所 TEL FAX 〆日 支払日
2 個人 山田 花子
3 個人 辻本 茂雄
4 法人 吉本興業(株)
5 個人 桑原 和男
6 個人 西川 きよし
7 法人 松竹芸能(株)
8 法人 ○○商事(株)
9 個人 横山 やすし
上記のようなデーターシートを作り 別に個人リスト、法人リストと別のシートを作ります。
個人リスト、法人リストのそれぞれのシートから Sheet1A列の分類を元に関数でそれぞれ抽出し、五十音順にできないでしょうか?
B列だけ抽出できれば あとはVLOOKUPで参照できると思うんですがもっと良い方法がありますか?
尚、Sheet1は随時更新していきます エクセルは2003です
判りにくい質問ですが、よろしくお願いします。
No.2ベストアンサー
- 回答日時:
[No.1補足]へのコメント、
》 その抽出方法を改良して…
「改良」?その言葉が適切か否かは扨置き…
添付図参照
「個人or法人」シートのセル A2 に次の配列数式を入力して、此れを下方にズズーッとドラッグ&ペースト
{=IF(ISERROR(SMALL(IF(Sheet1!A$1:A$1000=A$1,ROW(A$1:A$1000),""),ROW(A1))),"",INDEX(Sheet1!B$1:B$1000,SMALL(IF(Sheet1!A$1:A$1000=A$1,ROW(A$1:A$1000),""),ROW(A1))))}
ありがとうございました。
出来ました! 私が思ってる通りの事が出来ました。
本当に助かりました ありがとうございました。
また ご指導お願いいたします。
No.1
- 回答日時:
》 B列だけ抽出できれば あとはVLOOKUPで参照できると思うんですが…
そうですか、じゃあ「B列だけ抽出」だけを。
シート「個人」および「法人」のセル A2 に次の配列数式を入力して、此れをズズーッと下方にドラッグ&ペーストすればよろしい。
{=IF(ISERROR(SMALL(IF(Sheet1!$A$1:$A$1000=MID(CELL("filename",A1),FIND("]",CELL("filename",A1))+1,99),ROW($A$1:$A$1000),""),ROW(A1))),"",INDEX(Sheet1!$B$1:$B$1000,SMALL(IF(Sheet1!$A$1:$A$1000=MID(CELL("filename",A1),FIND("]",CELL("filename",A1))+1,99),ROW($A$1:$A$1000),""),ROW(A1))))}
【注】式を入力する前に、Sheet1、個人、法人の3シートを含むブックを適当な名前を付けて保存して必要があります。
【余談】前回の質問(今回と同じ?)はなぜ取り消したの?
この回答への補足
回答ありがとうございます。
バッチリできました。
ここまで出くると欲が出てきまして
その抽出方法を改良して Sheet1と別の同じシートに個人 法人と入力するセルを作り 個人と入力すれば個人リストを、法人と入力すれば個人リストを反映できないでしょうか?
申し訳ございませんが よろしくお願いします。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) エクセルについて教えてください。 3 2023/06/28 09:11
- Excel(エクセル) エクセルの条件付き書式 個人シートを参照して集計シートに色付けしたい 1 2023/06/22 00:39
- Excel(エクセル) エクセルでキーリストからデータを取り出して1枚1枚印刷するには? 11 2022/06/27 09:52
- Excel(エクセル) Excelマクロ 差分抽出の方法が知りたいです。 2 2023/03/07 13:25
- Excel(エクセル) Excelマクロの差分抽出のコードを教えていただきたいです。 2 2023/03/14 11:40
- Excel(エクセル) Excelで漢字人名が勝手に並び変わる(続) 4 2023/03/21 21:28
- Excel(エクセル) 条件書式でリスト内以外の単語に色をつけたい 1 2022/09/23 13:23
- Excel(エクセル) エクセルで割り振りをする方法 7 2022/08/02 14:02
- その他(Microsoft Office) outlookで宛先が異なるメールを一括送信する方法 outlookで200人それぞれをtoに指定し 2 2023/08/03 21:24
- Visual Basic(VBA) 複数シートの複数列に入力されているデータを重複なしで抽出するVBAを作りたいです。 9 2022/06/17 10:33
関連するカテゴリからQ&Aを探す
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
【スプレドシート】IMPORTRANGE...
-
英数字のみ全角から半角に変換
-
Microsoft Formsの「個人情報や...
-
会社PCのメールが更新されない
-
teams設定教えて下さい。 ①ビデ...
-
マイクロソフト 一時使用コード...
-
Outlook 2021 アカウント設定時...
-
Officeの字体
-
マクロ自動コピペ 貼り付ける場...
-
Outlookを立ち上げたらGoogleロ...
-
office365って抵抗感ないですか?
-
エクセルで英文字に入れた下線...
-
エクセル 表の移動
-
Microsoft365で自動保存が出来...
-
Outlookで、任意のメールアドレ...
-
Excel テーブル内の空白行の削除
-
SUMIFS関数について
-
OFFICEで自動保存されたファイ...
-
マクロ1があります。 A1のセル...
-
excel テーブル
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
【スプレドシート】IMPORTRANGE...
-
【スプレッドシート】指定の日...
-
英数字のみ全角から半角に変換
-
会社PCのメールが更新されない
-
マイクロソフト 一時使用コード...
-
Office 2021 Professional Plus...
-
エクセルで例えば、関数を使っ...
-
Microsoft Formsの「個人情報や...
-
1つのPCに「Excel 2010」「Exc...
-
エクセルで例えば、A1に㈱ベ...
-
理由を教えてください。
-
エクセルでXLOOKUP関数...
-
マイクロソフト オフィスについて
-
VLOOKUP関数について
-
teams設定教えて下さい。 ①ビデ...
-
Googleのスプレッドシートでシ...
-
【Excel VBA】PDFを作成して,...
-
Microsoft365で写真をアルバム...
-
Outlook で宛先が複数の場合の人数
-
Excel テーブル内の空白行の削除
おすすめ情報