職場の人から聞かれており、こんなことができるか教えて下さい。 vbaとかはできません。。 下記リスト

職場の人から聞かれており、こんなことができるか教えて下さい。
vbaとかはできません。。

下記リストがあります。
項目はもっと多いですが、縮小して記載します。
4桁　　　会社名　　　住所　　　電話番号
0236 （株）あ　　　東京都　　000-0-0236
5687 （株）い　　　神奈川県　000-0-5687
6842 （株）う　　　千葉県　　000-6842
3570 （株）え　　　大阪府　　000-3570
0236 （株）お　　　北海道　　222-0236

4桁は、電話番号の下4桁をrightで抜いてあります。
下4桁が重複することがあります。
別シートA1に0236を入力したら、
会社名と住所と電話番号を表示したい
これはvlookupでできました。

できるか確認したいのは、
重複しているものの場合、0236と入力したらB2にリストボックスで（株）あ　（株）お　　がリストで表示して、選択したらその他の情報を表示させたいです。

またそれに近い方法があれば教えて欲しいです。

No.3 回答者： googoo900 回答日時： 2024/06/23 22:01

そのやり方だと、３つ以上の重複があった場合の対応が難しくなります。

そこで代案として、エクセルのフィルター機能を使用することをおすすめします。

◆やり方
１．『4桁　会社名　住所　電話番号』が記載されている行全体を選択します。例えば、1行目を選択、です。
２．メニューからデータ→フィルターとします。
３．『4桁』の記載があるセルの脇にできた▼をクリックして、『0236』だけにチェックをつけ、余分なチェックをはずします。
４．『0236』と一致する行だけが表示されます。(一致しない行は表示されない)
５．フィルターを解除したいときは、メニューからデータ→クリア(フィルターの右横)とすれば、簡単に全表示に戻せます。

このやり方なら重複がいくつあっても大丈夫です。

No.2 回答者： little_experience000 回答日時： 2024/06/21 12:58

G1に検索地を入力

対象行
I2
=IF(SMALL(IF($G$1=$A$3:$A$100,1,1000)*ROW($A$3:$A$31),ROW()-2)>1000,"",SMALL(IF($G$1=$A$3:$A$100,1,1000)*ROW($A$3:$A$100),ROW()-2))


=indirect("B"&I2)

ですか

No.1 回答者： fujillin 回答日時： 2024/06/20 23:13

こんばんは

「リストボックス」と言っているのが「入力規則でのリスト形式」のことであるのならば可能です。

簡単な方法としては、作業列にでも該当するＢ列のリストを関数を利用して詰めて表示します。
（Office365等であれば、FILTER関数で簡単に抽出できます）
入力規則のリストの参照先に、この作業列の内容を個数を指定してリストに設定する式にしておけば良いです。

※ 365環境がないので確認はできませんが、抽出式をそのままリストの式として設定しても可能なのではないかと思います。