Excel VBA質問箱 IV

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

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


3870 / 13646 ツリー ←次へ | 前へ→

【59763】AoutFilter? Sort? シキノキロク 09/1/7(水) 16:17 質問[未読]
【59775】Re:AoutFilter? Sort? ゆみこん 09/1/8(木) 7:37 発言[未読]
【59778】Re:AoutFilter? Sort? シキノキロク 09/1/8(木) 10:13 お礼[未読]

【59763】AoutFilter? Sort?
質問  シキノキロク  - 09/1/7(水) 16:17 -

引用なし
パスワード
        A       B        C         D
1  0614000385014 0615000468012 0616000543010  0117000825020

上記の様に100以上のデーターが並んでいる下3桁を順位として20位迄を取り出したいのですが、どのょうにすれば良いか教えてください。

    

【59775】Re:AoutFilter? Sort?
発言  ゆみこん  - 09/1/8(木) 7:37 -

引用なし
パスワード
   ▼シキノキロク さん:
>     A       B        C         D
>1  0614000385014 0615000468012 0616000543010  0117000825020
>
>上記の様に100以上のデーターが並んでいる下3桁を順位として20位迄を取り出したいのですが、どのょうにすれば良いか教えてください。
>
>    
2つの配列を用意して、
・片方に 0614000385014 ・・・を入れていく (A
・もう一方に 014 ・・・右から3文字を入れていく (B

Bでソートを行ない、入れ替わりが発生したらAの添字も入替える。

書き出す際には小さい順の1〜20(添字なら0〜19かな?)を書き出せばいい。

とか。

【59778】Re:AoutFilter? Sort?
お礼  シキノキロク  - 09/1/8(木) 10:13 -

引用なし
パスワード
   ▼ゆみこん さん:
>▼シキノキロク さん:
>>     A       B        C         D
>>1  0614000385014 0615000468012 0616000543010  0117000825020
>>
>>上記の様に100以上のデーターが並んでいる下3桁を順位として20位迄を取り出したいのですが、どのょうにすれば良いか教えてください。
>>
>>    
>2つの配列を用意して、
>・片方に 0614000385014 ・・・を入れていく (A
>・もう一方に 014 ・・・右から3文字を入れていく (B
>
>Bでソートを行ない、入れ替わりが発生したらAの添字も入替える。
>
>書き出す際には小さい順の1〜20(添字なら0〜19かな?)を書き出せばいい。
>
>とか。

ゆみこんさん アドバイス有難うございました。
頑張ってみます。

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