• 締切済み

エクセルです。データ集計をしたいのですが困っています。

エクセル初心者です。 会社で社員各々の作業状況をまとめる表を作成したいのですが、マクロなどまったく分からないので行き詰っていますどなたか助けてください。 以下のような表をつくりたいと考えています。 物1・物2は物件名です。 作1・作2・作3は物件に対する作業内容です。 あ・い・うは担当者名です。 ■シート1(会社全体の作業状況)   A  B   C   D   E   F 1 11月     1日  2日  3日  4日 2 物1 作1   あ  あ 3    作2   い  い 4    作3   あ  う        う 5 物2 作2   う  う  あ 6    作3   あ  あ  い    い ■シート2(担当者"あ"の作業状況結果)  A B  C     D     E    F   1    1日    2日    3日   4日 2    物1作1  物1作1  物2作2 3    物1作3  物2作3 4    物2作3 といった感じです。 ■シート1で物件名・作業内容・担当者を入力したら各担当者別シートで日別で作業内容が表示できるとうれしいのですが・・・ ちなみに物件に対しての作業数はまちまちで、物件ごとの行数は決まっていません。行数を揃えないと無理でしたら作業数5行で間に合う感じです。 この内容でうまくお伝えできているか不安ですが、、、 どうぞよろしくお願いします。

みんなの回答

  • kusa_mochi
  • ベストアンサー率76% (1597/2087)
回答No.1

基本的なアイデアだけだが・・・  【セルにマクロを埋め込む方法の場合】   ・各作業担当者のシートで以下の様な仕様のマクロをセルに設定する    =IF(全体!C2="あ",CONCATENATE(T(全体!$A2),T(全体!$B2)),"")   ※上記は あ という人のシートに設定するマクロ    シート1のシート名として仮に「全体」という名前を割り振っている   ・上記のマクロを、全ての日付かつデータが入りそうな行のセルに設定すると、あという人の作業内容が抽出されてくると思う。   ・ただ抽出しているだけなので、空白のセルが出てくる。その空白を外して詰めたいなら、オートフィルタで空白を取り除くという方法を取る。    (このオートフィルタは、行方向のセルの関係を維持しようとするので、質問主殿の意図するような形にはならないかもしれない。もしかすると、行方向のセルの関係を断ち切った形でフィルタを設定できる裏技があるのかもしれないが、自分はそういう方法を知らない)   ・セルに対してマクロを設定する方法だと、この辺が限界かと思う。 完全に空白セルが出ない、詰めた形にするにはプログラム形式のVBAを組む必要があるかと思う。 で、そのVBAをフォームのOKボタンに貼り付けて、クリックされた際に実行するという形式になるだろうか。 そのプログラム自体は、プログラマーの経験があればそれほど難しくは無い筈だが・・・ スキャンして、該当条件にヒットするものを見つけたらセルにセットするという作業を2重ループの中で実行するだけだから。   

kamepotti
質問者

お礼

早速のご回答ありがとうございます。(>_<) 空白のセルを表示しないプログラムはこのサイトで見つけることができましたので、早速試してみます。 また、結果ご報告いたします。 ありがとうございます。