|
フォームのリストボックスの機種番号で選んだ番号によって
エラー項目というシートからその番号に対応するエラー番号
だけを抽出してComboエラー番号のList項目に入れたいのですが
以下の書き方だとB2をフィルターしてしまいます。
どうして良いかわからず困っています。なにとぞお教え下さい。
-------------------------------------------------------------
Private Sub Comboエラー番号_Enter()
Worksheets("エラー項目").Select
Range("E2").AutoFilter
Range("E2").AutoFilter Field:=1, Criteria1:=Text機種番号.Value
Comboエラー番号.List = Range("エラー番号").Value
End Sub
-------------------------------------------------------------
★F列(F2-F10)には 範囲名 エラー番号としてあります。
EXCEL------------------------------------------
C | D | E | F |
2 機種番号| |機種番号 |エラー番号 |
3 BS12 | |BS12 |4551 |
4 DF55 | |BS12 |4552 |
5 | |BS12 |4553 |
6 | |DF55 |1553 |
7 | |DF55 |1553 |
8 | |DF55 |1553 |
9 | |DF55 |1553 |
10 | |BS12 |4554 |
-----------------------------------------------
|
|