エクセルでこれをしたいのですが

質問

商品Ｎｏがばらばらな在庫表があります。
そのため担当者は探すのに時間がかかってます。

並べ替えで昇順、降順にすればいいのですが、それをしないで、

ＰＣ音痴な人でも
商品Ｎｏを入力すれば、在庫表の中の該当箇所にカーソルが移動するようなことってできるのでしょうか？

回答No.5

tom04 · ベストアンサー

こんばんは！

希望の方法とは異なると思いますが・・・

無理矢理の一例です。

↓の画像で説明させていただくと
A列全てを範囲指定し、条件付書式で
E1セルに入力した商品番号のセルの色を付ける方法です。

単に、どこにあるかだけを目立たせる方法ですので、
的外れなら無視してください。

A列全てを範囲指定し、条件付書式　→　数式が　を選択し
数式欄に
=AND($E$1<>"",A1=$E$1)

としてOK

これで、E1セルと同じ商品番号のセルに色が付きます。
尚、当然のことながら商品番号に重複はないものとします。

以上、かなり強引な方法になりましたが、
参考になれば幸いです。m(__)m

お礼

有難うございます。

いえいえ、まさにこんな感じです。
助かりました。

回答No.6

maron--5

１）C1=IF(B1="","へジャンプ",HYPERLINK("#A"&MATCH(B1,A1:A20,0),"へジャンプ"))　と入力します
２）B1に「商品No.」を入力して、
３）C1をクリックするとB1の商品No.にカーソルが移動（ジャンプ）します

お礼

おはようございます。

やってみたのですが、うまくいきません。
HYPERLINKをもう少し勉強します。

回答No.4

hige_082

A列に商品番号があるとして
セルA1へ「商品番号は？」と入力して置き
セルB1へ番号を入力する
番号があれば対象セルを選択、無ければ何も起こらない

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$1" Then
Range("a:a").Find(Target.Value, LookIn:=xlValues).Select
End If
End Sub

対象シートのタブを右クリックし、コードの表示を選択
コードをコピペし閉じる

ウィンドウの固定で1行目を常に表示しておけば
すぐに検索できて楽かな

お礼

有難うございます。

私のレベルでは少々きついですが、勉強します。

回答No.3

nag0720

VBAを使っていいんなら、Worksheet_Changeイベントの中に検索とカーソル移動を記述すれば可能です。

お礼

有難うございます。

ＶＢＡは私にはちょっと...

回答No.2

fujillin

普通に検索ではダメなのでしょうか？

「編集」-「検索」（またはCtrl+F）から、商品Ｎｏを入力

回答No.1

kopanda116

Ctrl ＋ F を押して、出てきた画面に商品Noを入力し、検索すれば、カーソルが移動するはずです。

お礼

有難うございます。

おっしゃる通りなのですが、
その程度の作業も避けたいということなのです。

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
商品番号は？　　*****　←に番号"10"を入力するだけで
”10”のところへもっていきたいのですが。

　　　＿＿＿＿＿＿＿＿＿
　　　2121 |　あああああ
　　　1111　| ええええ
　　　33333 |　ｇｄｄｄ
　→　10　　|　 おれｐｋｌ
　　　＿＿＿＿＿＿＿＿＿