[[20050707154316]]　『オートフィルタで抽出したデータに番号を振りたい』（でんわむし）　ページの最後に飛ぶ

『オートフィルタで抽出したデータに番号を振りたい』（でんわむし）

いつもお世話になってます。質問いたします。

オートフィルタである項目のデータを絞った状態で、そのデータに

上から順に番号を振りたいのですが、手動で入力する以外に方法はありますでしょうか？

なるべくマクロは使わず関数で済ましたいのですが・・・・。

具体的には下記のようなことです。

 　　　Ａ　　Ｂ　　Ｃ　　　　　　　　　　　　　　　　Ａ　　Ｂ　　Ｃ
 １　出身地 名前　年齢　　　　　　　　　　　　 １　出身地 名前　年齢
 ２　熊本　 鈴木　２４　これをオートフィルタで ３　東京　 伊藤　３１
 ３　東京　 伊藤　３１　東京だけに絞って・・・ ５　東京　 金田　２２
 ４　宮城　 松本　２８　　　　→→　　　　　　 ６　東京　 深尾　２７
 ５　東京　 金田　２２　　　　　　　　　　　　 ８　東京　 須藤　２９
 ６　東京　 深尾　２７
 ７　埼玉　 田原　３０
 ８　東京　 須藤　２９

上記の右の状態（東京出身者だけに絞った状態）でいうとＤ列あたりに上から順に

「1」(セルD3)、「2」(セルD5)、「3」(セルD6)、「4」(セルD8)と

単純に番号を振りたいのです。

最初フィルコピーの連続データでやろうとしたのですが、オートフィルタが利いてる時は

連続データのフィルコピーは無効になるみたいでできませんでした。

実際のデータは100行以上あるので丁寧に手打ちで１つ１つ「１、２、３」と打っていくと

膨大な時間がかかってしまいます。これを実際に使用する人はただデータを見たいだけの

人なので、なるべくマクロは使わず関数のみでできるようにしたいのですが・・・・。

いろいろ考えたのですがいいのが思いつきませんでした。どうかよろしくお願いします。

[エクセルのバージョン]
Excel2002 SP3

[OSのバージョン]
Windows2000 SP4

 オートフィルタで絞り込む前に、D1に、
 =SUBTOTAL(3,$A$1:A1)　と入力し、データの分だけ下にコピーておきます。
 この状態ではすべてのデータに連番がつくと思いますが、
 オートフィルタで絞り込むと、
 表示されたものだけに連番がつくと思います。

 注:D列にはオートフィルタの▽マークがつかない状態にすること。
 (sato)

 衝突ーーー。
 >「1」(セルD3)、「2」(セルD5)、「3」(セルD6)、「4」(セルD8)と
 との事なので、
 D2セルに、=SUBTOTAL(3,$A$2:A2)　　ですよね。
(sin)　ちょっと修正しました。

 できました！
 SUBTOTAL関数があるのを忘れてました。
 SUBTOTAL関数だと、オートフィルタで絞るとそのデータのみで計算してくれるんですよね。
 開始位置はsinさんの言う位置ですね。
 sinさん、satoさんどうもありがとうございました。
 (でんわむし)

コメント返信：

[ 一覧(最新更新順) ]

[[20050707154316]] 『オートフィルタで抽出したデータに番号を振りたい』（でんわむし） ページの最後に飛ぶ

[[20050707154316]]　『オートフィルタで抽出したデータに番号を振りたい』（でんわむし）　ページの最後に飛ぶ