Excel VBA質問箱 IV

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

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


22942 / 76732 ←次へ | 前へ→

【59162】グループ分けをしたいのですが
質問  smasa  - 08/11/30(日) 23:35 -

引用なし
パスワード
   よろしくお願いします。

重複した数字がある行を判別してグループにし、
結果をN列に表示したいのですが。
お力をお貸しいただけないでしょうか?

結果的には、下の例のように、G5:K10までの範囲にある数字を
以下のようにN列に表示したいのです。

>>    G H I J K ... M  N
>> 5    1          1,2,3,4
>> 6    2 3        1,2,3,4
>> 7    5          5,6
>> 8    3 4        1,2,3,4
>> 9   1 2        1,2,3,4
>>10   5 6        5,6 
>>11

行方向は空白セルでとまるようにします。(例の場合は10まで)

もともとは下のように数字が入力されています。
(1番左は行番号です)

          列
>>    G H I J K ... M N
>> 5    1        
>> 6    2 3       
>> 7    5        
>> 8    3 4       
>> 9   1 2       
>>10   5 6      

G5の1から、表の上から順番に、範囲内(G5:K10)に同じ数字がないかどうか調べます。
たとえば、G5の1という数字はG9にも入力されています。
ですから、行5と行9は同じグループ。
次に、G6の2という数字はH9にも入力されていますので、
行5と行9と行6は同じグループ。
次に、H6の3という数字はG8にもあります。
行5、行9、行6、行8は同じグループ。
次にH8の4は他に入力されていません。
そこで、各グループの数字を取り出し、重複しないように
N列に以下のように入力されるようにします。

          列
>>   F  G H I J K ... M N
>> 5  12  1          1,2,3,4
>> 6  21  2 3         1,2,3,4
>> 7  30  5        
>> 8  11  3 4         1,2,3,4
>> 9  6  1 2         1,2,3,4
>>10  2  5 6

次にG7の5という数字はG10にもあります。
ですので、行7と行10は同じグループで、
N列の7と10には5,6と入力されるようにしたいのです。

関数等を使ってやってみていますが、
なかなかうまくいきません。
お考えをいただきたく、よろしくお願いいたします。

0 hits

【59162】グループ分けをしたいのですが smasa 08/11/30(日) 23:35 質問
【59163】Re:グループ分けをしたいのですが かみちゃん 08/11/30(日) 23:38 発言
【59167】Re:グループ分けをしたいのですが ichinose 08/12/1(月) 8:46 発言
【59186】Re:グループ分けをしたいのですが smasa 08/12/1(月) 20:02 お礼
【59177】Re:グループ分けをしたいのですが Yuki 08/12/1(月) 13:42 発言

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