Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
6725 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【43461】シート１の各集計合計値をシート２の３つの条件に合致するセルにコピーさせ... むつの川さん 06/10/16(月) 19:48 質問[未読]
【43479】Re:シート１の各集計合計値をシート２の... ナイスプログラム 06/10/17(火) 1:25 質問[未読]
【43509】Re:シート１の各集計合計値をシート２の... ナイスプログラム 06/10/18(水) 1:16 質問[未読]
【43461】シート１の各集計合計値をシート２の３つ...
質問  むつの川さん E-MAIL  - 06/10/16(月) 19:48 -
引用なし
パスワード
   私は全くのマクロ初心者です。シート１の原様式をエクセルの集計機能を使って
マクロ記録で下記表に作り変えるまではできましたが、それ以降のコードが全くわかりません。要するに、毎月の職場毎の合計値を区分を加味しながら該当するセルに転記を繰り返したいのですが、その方法をどなたかお教え願えないでしょうか。
よろしくお願いいたします。（XPの2003です。）

　　　 Ｈ15年11月分 作業日報ﾌｧｲﾙ（シート１）　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　11月
日付　　　　職場　　　　 区分　　　　規内時間　　　　規外時間　　　　合計
51124　　　　5340　　　　 100　　　　　　8　　　　　 0　　　　　8
51130　　　　5340　　　　 100　　　　　 16　　　　　 0　　　　 16
　　　　5340 集計　　　　　　　　　　　　　　　　 24
51116　　　　5350　　　　 100　　　　　　4　　　　 0.5　　　　　4.5
51121　　　　5350　　　　 100　　　　　　1　　　　　 0　　　　　1
51130　　　　5350　　　　 100　　　　　　3　　　　　 0　　　　　3
　　　　5350 集計　　　　　　　　　　　　　　　　　8.5
51117　　　　8710　　　　 610　　　　　　4　　　　　 0　　　　　4
51122　　　　8710　　　　 610　　　　　　4　　　　　 0　　　　　4
51123　　　　8710　　　　 610　　　　　　0　　　　　 3　　　　　3
　　　　8710 集計　　　　　　　　　　　　　　　　 11


　　　　　　　　工　数　集　計　表（シート２）　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
区分　　　　　　100　　　　　　　　　　　300　　　　　　　　　　　　500　　　　
月　11月 ・・・ 4月　計　　　　11月 ・・・4月　計　 11月 ・・・4月　計
職場
5340　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
5350　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
・
・
5360　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
8520　　　　　　　　　　　　 　　　　　　　　　　　　　　　　　　　　
8710　　　　　　　　　　　　　　　　　　　　　　　　　　　　
計　　　　

区分　　　　　　610　　　　　　　　　　　 620　　　　　　　　　　　　 630
月　11月 ・・・ 4月　計　　　　11月 ・・・4月　計　 11月 ・・・4月　計
職場
5340　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
5350　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
・
・
5360　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
8520　　　　　　　　　　　　 　　　　　　　　　　　　　　　　　　　　
8710　　　　　　　　　　　　　　　　　　　　　　　　　　　　
計
【43479】Re:シート１の各集計合計値をシート２の...
質問  ナイスプログラム WEB  - 06/10/17(火) 1:25 -
引用なし
パスワード
   　今晩は。よく分からない所があります。想像ですが、

【シート1】
　職場の下に書いてある5340は、職場のコード
　5340の隣に書いてある集計の所には、実際には数字が書いてあって、それをシート
２に転記する。

【シート２】
　１１月から４月までの各月の欄があって、その下に、各職場の集計の数字を入れる。

【その他】
各月のシートは別々になっている。

これであってますか？
　
　
【43509】Re:シート１の各集計合計値をシート２の...
質問  ナイスプログラム WEB  - 06/10/18(水) 1:16 -
引用なし
パスワード
   　今晩は。別のスレッドの続きを書きます。


>深夜にもかかわらず見ていただいて有難うございます。感激しております。
>私のシート１の表がずれてしまいまして、迷惑をおかけしました。
>実際は工数の合計数値は合計列の下に列挙されております。
>それからシート２はA4１枚のシートに表を６こ並べておりますので、別々ではありませ
>ん。
>お忙しいのに大変お世話をおかけしますが、なにとぞご指導をお願いいたします。


　だいたい分りました。次の方法で出来るだろうと思っています。

【方法】

1.シート１の全てのセルをfor　eachで検索し、値が"集計"だったら、そのセルからの
相対位置で必要な情報を得て配列に入れ、記入用サブプロシージャに進む。

2.シート２に、配列とセルの情報を元に位置を決めて記入する。

*この場合、大事なのはどこに何が書いてあるかの、位置です。想像ですが、

【シート１】
"集計"の3つ右のセルに集計値が書いてある。
"集計"の１つ左に職場コードが書いてある。
上の行の二つ左に日付(51130など。これで月を得る。)
１つ上に区分

【シート２】
区分の位置がよく分らないが、２行目の７列目から、セル１２個ごとだと思う。

これで合っていますか？また、シート２の区分は、単独セルだといいのですが、
結合セルですか？
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
6725 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free