Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


58569 / 76732 ←次へ | 前へ→

【22889】Re:リストボックスの表示方法
発言  G-Luck  - 05/3/6(日) 11:47 -

引用なし
パスワード
   ▼たかし さん:

>Listbox1に表示している3つのセルの1番左の値でのオートフィルターしか
>できません。
>
>Dim CT2 As Range, Cel As Range, LB2tb() As String
> Worksheets("データ1").Activate
> LtW = ListBox1.List(ListBox1.ListIndex)
> Range("E1").AutoFilter Field:=4, Criteria1:=LtW
>     ↑
>  これを何に変えてもオートフィルターで選択する値が変更できない。
>  シリアルNoでオートフィルターしたいのに、シリアルNoの列を
>  機種の値でオートフィルターしてしまう。

AutoFilter を三回かけてみては?
AutoFilter の Field:=1 がフィルターの対象列になります。
左から1,2,3です。

>オートフィルターで1行に絞れたとして、その行番号の取得はどうすればいいのでしょうか?よろしくお願いいたします。

AutoFilter.Range でオートフィルターの対象範囲が取得できます。
それと、
Offset 'セル範囲の移動
Resize 'セル範囲の変更
Specialcell '特殊セルの取得
を使ってみてはどうですか?

1 hits

【22853】リストボックスの表示方法 たかし 05/3/5(土) 0:52 質問
【22871】Re:リストボックスの表示方法 G-Luck 05/3/5(土) 13:42 発言
【22879】Re:リストボックスの表示方法 たかし 05/3/5(土) 15:04 発言
【22881】Re:リストボックスの表示方法 G-Luck 05/3/5(土) 18:08 回答
【22882】Re:リストボックスの表示方法 たかし 05/3/5(土) 19:38 お礼
【22883】Re:リストボックスの表示方法 たかし 05/3/5(土) 20:57 質問
【22884】Re:リストボックスの表示方法 G-Luck 05/3/5(土) 21:10 発言
【22888】Re:リストボックスの表示方法 たかし 05/3/6(日) 11:23 質問
【22889】Re:リストボックスの表示方法 G-Luck 05/3/6(日) 11:47 発言
【22893】Re:リストボックスの表示方法 たかし 05/3/6(日) 13:21 質問
【22895】Re:リストボックスの表示方法 G-Luck 05/3/6(日) 14:57 発言
【22896】Re:リストボックスの表示方法 たかし 05/3/6(日) 16:19 質問

58569 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free