Excel VBA質問箱 IV

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

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


10607 / 76734 ←次へ | 前へ→

【71673】Re:表の整理
発言  UO3  - 12/3/27(火) 17:20 -

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

こんにちは

Sample2の行の整列アルゴリズム(というほど、たいそうなものじゃありませんが)

・まず、各列の氏名を作業列にコピーします。で、これを、重複を排除して
 一意の名前のリストとして別の作業列におきます。
 (これをユニークな名前リストとよびましょう)
・で、次に、3列ごとの各ブロックを、氏名順に並び替えます。
 また、ユニークな名前リストも氏名順に並び替えます。
・これで、各ブロックも、ユニークな名前リストも、氏名の出現順は同じになりますね。
・データ内容としては、あるブロックには田中はあるけど、あるブロックにはない。
 で、ユニークな氏名リストには田中が必ず1つ存在するという状況になります。

 ここから処理です。処理はユニークな名前リストの上から順番に行います。

1.ユニークな名前リストの先頭が安部だったとします。この安部を処理します。
2.処理すべきユニークな名前リストから取り出した氏名とデータの突合せですが、まず最初は
 2行目(データの最初)を見ます。
3.各ブロックの安部の数をブロックごとに把握しておきます。また、これらのなかでの
 最大値も把握します。最大値が4件だったとします。
4.見ている行が安部かもしれません。安部ではないかもしれません。
 安部ではなかった場合、安部の最大値の4行の空白セル3列分をこのブロックに挿入します。
 安部だった場合、このブロックの安部の件数が4件だった場合(つまりブロックの中で安部の最大値)
 挿入は行いません。
 このブロックの安部の件数が4未満の場合、4から、その件数を引いた行数分の3列の空白セルを挿入します。
5.この結果、元のデータは、最初の行(2行目から5行目)が安部用、他のデータは、6行目以降に下げられて
 います。
6.で、次に、ユニークな名前リストから次の名前を取り出し、データの6行目をつき合わせます。
7.上記、3.〜5.を実行します。
8.このように、ユニークな名前リストから全て名前を取り出すまで、ループ処理をします。

こんな程度でご理解いただけましたでしょうか?

12 hits

【71555】表の整理 ドカ 12/3/16(金) 20:43 質問
【71557】Re:表の整理 ドカ 12/3/16(金) 20:54 発言
【71559】Re:表の整理 何か変じゃないですか 12/3/16(金) 22:44 発言
【71561】Re:表の整理 ドカ 12/3/17(土) 4:42 発言
【71560】Re:表の整理 UO3 12/3/16(金) 23:09 発言
【71562】Re:表の整理 ドカ 12/3/17(土) 4:57 お礼
【71564】Re:表の整理 UO3 12/3/17(土) 9:39 回答
【71671】Re:表の整理 ドカ 12/3/27(火) 14:10 質問
【71672】Re:表の整理 UO3 12/3/27(火) 16:43 発言
【71673】Re:表の整理 UO3 12/3/27(火) 17:20 発言
【71674】Re:表の整理 ドカ 12/3/27(火) 20:11 発言
【71675】Re:表の整理 ドカ 12/3/28(水) 9:08 お礼
【71676】Re:表の整理 UO3 12/3/28(水) 10:34 発言
【71677】Re:表の整理 ドカ 12/3/28(水) 11:10 発言
【71678】Re:表の整理 UO3 12/3/28(水) 15:08 発言
【71679】Re:表の整理 UO3 12/3/28(水) 15:13 発言
【71683】Re:表の整理 ドカ 12/3/28(水) 20:34 お礼
【71688】Re:表の整理 ドカ 12/3/30(金) 8:29 質問
【71689】Re:表の整理 ドカ 12/3/30(金) 9:06 質問
【71690】Re:表の整理 UO3 12/3/30(金) 10:27 発言
【71691】Re:表の整理 UO3 12/3/30(金) 11:46 発言
【71692】Re:表の整理 UO3 12/3/30(金) 21:10 発言
【71720】Re:表の整理 UO3 12/4/2(月) 14:10 発言
【71724】Re:表の整理 ドカ 12/4/3(火) 7:59 お礼
【71728】Re:表の整理 UO3 12/4/3(火) 13:16 発言
【71731】Re:表の整理 UO3 12/4/3(火) 16:54 発言
【71725】Re:表の整理 ドカ 12/4/3(火) 8:15 質問
【71726】Re:表の整理 UO3 12/4/3(火) 12:39 発言
【71727】Re:表の整理 UO3 12/4/3(火) 12:44 発言
【71736】Re:表の整理 ドカ 12/4/4(水) 15:59 お礼

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