Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

13092 / 76738

←次へ　｜　前へ→


	【69155】Re:オートフィルタで抽出した値をテキストボックスに

123 - 11/5/20(金) 21:10 -


	引用なし

	パスワード

▼ダイジさん：
>▼ダイジさん：
「3」を取得するだけなら

1行目に行挿入し
セルA1 に　=subtotal(4,A3:A100)　を入れる
2行目から「オートフィルタ」をかける

イメージだと
　　A　　　　B　　　　 C　　D
1　=subtotal(4,A3:A100)
2伝票番号　商品名　　数量　金額
3 　1　　　パン
4 　2　　　バナナ
5 　3　　　ジュース
6 　5　　　チョコ
7　 7　　　ジュース
8　 8　　　ジュース

2行目から「ジュース」でフィルタを掛けて
　　A　　　　B　　　　 C　　D
1　 3
2伝票番号　商品名　　数量　金額
5 　3　　　ジュース
7　 7　　　ジュース
8　 8　　　ジュース

セルA1に「3」を取得できます

msgbox　Range("a1")

でメッセージＢＯＸに出せます

0 hits

▼

【69146】オートフィルタで抽出した値をテキストボックスに ダイジ 11/5/20(金) 17:03