Excel VBA質問箱 IV

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

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


52570 / 76732 ←次へ | 前へ→

【28997】Re:ワークシート間の検索集計
質問  toki  - 05/9/20(火) 21:46 -

引用なし
パスワード
   ▼ponpon さん:
ponponさんこんばんは。いつもありがとうございます。

仕様は個人ごとに集計シートを作成します。

ご理解いただくためにシステム概要について詳しくご説明します。

例えば、社員が田中、鈴木、佐藤、井上、吉田の5名がいるとします。

田中 S職 社員番号1
鈴木 M職 社員番号2
佐藤 J職 社員番号3
井上 S職 社員番号4
吉田 J職 社員番号5

3名の点数を毎月つけていき、6ヶ月ごとに集計シートで集計結果を出力します。

【社員登録の仕方】
初月を4月とし、年度末を3月とします。

1月〜12月までの入力用ワークシートがあり、それぞれのワークシートには、職務、氏名、社員番号、点数の入力欄が列ごとに配置してあります。
これらの社員データは、行単位で管理され、ユーザーフォームにて社員登録フォームがあり、こちらで職務、氏名、社員番号を入力すると、新しい行が追加される、というようになっています。

※月別ワークシート例

職務 氏名 社員番号 点数A 点数B 点数C 点数D・・・・(←見出し部分)
S職 田中   1
M職 鈴木   2
J職 佐藤   3
S職 井上   4
J職 吉田   5

この登録フォームから登録された社員データ(点数を除く)は、1月〜12月までのワークシートに同時に作成されます。

登録の段取りですが、職務別に行うわけではありません。職務的には順不同で登録していきます。
したがって、登録順に上から順番に行が追加されていくため、ワークシート上には職務がバラバラの状態で、登録されていきます。
後で点数をつけるときに職務ごとに整列していた方がやりやすいため、前回ご質問させていただいた「整列ボタン」をワークシート上に置き、このボタンを押すと、職務ごとに整列するようにしてあります。
この整列も、ワークシート1月〜12月までのすべてが連動するようにしてあります。

【点数のつけ方】
得点対象の種類は10個あります。毎月発生するので、各月ごとに手入力していきます。

例えば、4月に各人の10種類の点数がはじき出されるので、それを

     点数A  点数B  点数C  点数D・・・・
田中   5     3     2      3
鈴木   3     3     3      4
佐藤   4     3     2      5
井上   5     2     1      2
吉田   3     3     2      4

というようにワークシート上で手入力していきます。

この作業を他の各月に対しても行います。

【集計の仕方】
各月の点数入力が終わると、得点集計がされることになります。

別に用意された点数集計シートにて個人ごとの集計が行われます。

※点数集計表概略

・・・・・・・・・・・・・・・・・    <点数集計表>・・・・・・・・・・・・・・・・・・・・
S職 社員番号1 田中

見出し    4月 5月 6月 7月 8月 9月  6ヶ月平均

点数A   5   3   3  2   3   1    2.8
点数B   3   2   3  1   2   2    2.1
点数C   2   2   2  2   1   2    1.3
点数D   3   3   4  4   3   2    3.1
点数E

見出し   4月 5月 6月 7月 8月 9月  6ヶ月平均

点数F
点数G
点数H
点数I
点数J
・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・

これらの集計のタイミングですが、印刷ボタンを実行したときに集計〜印刷までの
流れをコーディングしたいと思っています。

具体的には、ユーザーフォームにて職務別一括印刷画面を作成し、

1.リストボックスから、印刷対象職務を選択する。
2.印刷実行
3.対象職務者全員に対し、順番に各月集計〜印刷を実行していく。
4.対象職務者の印刷が終わって終了

例えば
1.S職を選択
2.印刷実行
3.田中さん、井上さんを集計のうえ印刷
4.終了

という流れです。

私がよくわからないのは
1.S職を選択
のところで、ユーザーフォームで選択したS職を各月シートのA列を検索し、S職田中さんを見つけ出したうえで
対応する行にある点数を抜き取り、点数集計表の「対応月」に貼り付ける、というところです。
この貼り付け作業を4月〜9月について行わなくてはなりません。

この抜き取り作業時に、念の為、処理中のS職、田中、社員番号1に関して、検索対象を4月シートにした場合、それ以外のシートは、対応する社員番号をキーとして抜き取り行を絞れればよいかと思っています。
ただ、私にはこの連携の仕方が考えつきません。

※ちなみに点数集計表は上図のように「見出し」が間に入ってます。

また、各点数に変数を用意して代入していくことも考えましたがかなりの変数量になるので行単位、列単位での処理ができないか、とも思っています。

もちろん田中さんが終わったあとは続けて、井上さんを拾い出し、同じ処理をします。

このS職対応者全員に関する繰り返し処理がよくわかりません。

以上なのですが、ご理解いただけましたでしょうか?

不明な点等ありましたらまたご指摘ください。
よろしくお願いします。
0 hits

【28969】ワークシート間の検索集計 toki 05/9/19(月) 23:13 質問
【28972】Re:ワークシート間の検索集計 Statis 05/9/20(火) 9:09 回答
【28996】Re:ワークシート間の検索集計 toki 05/9/20(火) 21:45 お礼
【28995】Re:ワークシート間の検索集計 ponpon 05/9/20(火) 19:25 発言
【28997】Re:ワークシート間の検索集計 toki 05/9/20(火) 21:46 質問
【29000】Re:ワークシート間の検索集計 ponpon 05/9/20(火) 22:52 発言
【29002】Re:ワークシート間の検索集計 toki 05/9/21(水) 7:19 お礼
【29035】Re:ワークシート間の検索集計 ponpon 05/9/22(木) 2:46 発言
【29052】Re:ワークシート間の検索集計 toki 05/9/22(木) 15:21 お礼
【29086】Re:ワークシート間の検索集計 toki 05/9/23(金) 16:56 お礼
【29091】Re:ワークシート間の検索集計 ponpon 05/9/23(金) 21:05 発言
【29096】Re:ワークシート間の検索集計 toki 05/9/23(金) 22:03 質問
【29097】Re:ワークシート間の検索集計 ponpon 05/9/24(土) 0:23 発言
【29099】Re:ワークシート間の検索集計 toki 05/9/24(土) 12:46 お礼
【29104】Re:ワークシート間の検索集計 ponpon 05/9/24(土) 21:40 発言
【29106】Re:ワークシート間の検索集計 toki 05/9/24(土) 23:14 お礼
【29108】Re:ワークシート間の検索集計 ponpon 05/9/25(日) 5:49 発言
【29109】Re:ワークシート間の検索集計 toki 05/9/25(日) 8:27 お礼
【29122】Re:ワークシート間の検索集計 ponpon 05/9/25(日) 16:50 発言
【29126】Re:ワークシート間の検索集計 toki 05/9/25(日) 19:45 質問
【29128】Re:ワークシート間の検索集計 ponpon 05/9/25(日) 21:41 発言
【29188】Re:ワークシート間の検索集計 toki 05/9/27(火) 12:01 質問
【29199】Re:ワークシート間の検索集計 toki 05/9/27(火) 14:21 お礼
【29437】Re:ワークシート間の検索集計 toki 05/10/4(火) 23:08 質問
【29448】Re:ワークシート間の検索集計 Jaka 05/10/5(水) 13:16 発言
【29454】Re:ワークシート間の検索集計 ponpon 05/10/5(水) 18:34 発言
【29463】Re:ワークシート間の検索集計 toki 05/10/5(水) 22:21 質問
【29467】Re:ワークシート間の検索集計 ponpon 05/10/5(水) 22:55 発言
【29526】Re:ワークシート間の検索集計 toki 05/10/6(木) 21:57 お礼
【29529】Re:ワークシート間の検索集計 ponpon 05/10/6(木) 23:34 発言
【29461】Re:ワークシート間の検索集計 toki 05/10/5(水) 22:08 質問
【29462】Re:ワークシート間の検索集計 toki 05/10/5(水) 22:12 発言

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