Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
13069 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【7157】2表から項目一致なら合計し違ったら追加 ちーりん 03/8/24(日) 16:11 質問
【7158】Re:2表から項目一致なら合計し違ったら追加 INA 03/8/24(日) 20:04 発言
【7160】Re:2表から項目一致なら合計し違ったら追加 ちーりん 03/8/24(日) 20:35 発言
【7163】Re:2表から項目一致なら合計し違ったら追加 INA 03/8/25(月) 9:08 発言
【7209】Re:2表から項目一致なら合計し違ったら追加 ちーりん 03/8/26(火) 17:38 お礼
【7157】2表から項目一致なら合計し違ったら追加
質問  ちーりん  - 03/8/24(日) 16:11 -
引用なし
パスワード
   初心者なのですが、聞く人もいず困っています。よろしくお願いします。

１シートにその日の作業No.と作業時間を作業日報として入力しています。
これを日々累計していきたいのですが、下記のようなマクロでは作業時間が累計されません。
ちなみに日々のシートではｈ列以降は個人の作業時間でｇ列はその合計です。（累計の方にCOPYしてないから？）

For i = 6 To 25
Set matchcell = ws1.Range("b6:b" & lastrow).Find(ws2.Range("b" & i), _
lookat:=xlWhole, MatchCase:=True)
　　　　
　　　 If matchcell Is Nothing Then
　　　　 ws2.Range("b" & i & ":g" & i).Copy _
　　　　 ws1.Range("b65536").End(xlUp).Offset(1, 0)
　　　　　　　　　
　　　 Else
　　　　
　　　　k = matchcell.Row
　　　　　ws2.Range("g" & i).Copy
　　　　　ws1.Range("g" & k).PasteSpecial _
　　　　　Paste:=xlPasteValues, _
　　　　　operation:=xlPasteSpecialOperationAdd
　　　　　
　　　 End If
　　
　　 Next i
【7158】Re:2表から項目一致なら合計し違ったら追加
発言  INA  - 03/8/24(日) 20:04 -
引用なし
パスワード
   分かりづらいので、現在のシートの状態と、
マクロ処理した後のシートの状態を掲載して頂けないでしょうか？
【7160】Re:2表から項目一致なら合計し違ったら追加
発言  ちーりん  - 03/8/24(日) 20:35 -
引用なし
パスワード
   ▼INA さん：
>分かりづらいので、現在のシートの状態と、
>マクロ処理した後のシートの状態を掲載して頂けないでしょうか？

どう書けばいいのか…こんなでわかっていただけますか？

a　 　　b　 　　c 　　 d　 　　e 　　 f　 　　g　　　　　h〜　　　　　（列）
　　　作業番号　作業名　　　　　　　　　　　ｈ〜の合計　　個人の作業時間数
　　　　　　　　　　　　　　　　　　　　　　（数式）
　　　　　　　　　　　　　　　　　　　　　　
が　各シートに入っています。で、作業時間累計のシートは

a　 　　b　 　　c 　　 d　 　　e 　　 f　 　　g　
　　　作業番号　作業名　　　　　　　　　　　ｈ〜の合計　　となっています。

同じ作業番号（作業名）なら作業時間を累計しｇ列へ、また、違っていたら最後尾へコピーして追加したいのです。
マクロ処理後の累計のシートを見るとｇ列に　値　ではなく、数式（SUM）が入っていました。ｈ列以降をコピーしていないので数式だと　0　になるのはそうだと思うんですが、ではどうすればいいのか…？？　よろしくお願いします。
【7163】Re:2表から項目一致なら合計し違ったら追加
発言  INA  - 03/8/25(月) 9:08 -
引用なし
パスワード
   >どう書けばいいのか…こんなでわかっていただけますか？
すいません。まだ理解できないです。

そこで、再度ご質問ですが・・

(1)Sheetは、どのような名前のシートがあるのですか？
　 作業時間累計？　累計？

(2)各シートの状態は？
>a　 　　b　 　　c 　　 d　 　　e 　　 f　 　　g　　　　　h〜　　　　　（列）
>　　　作業番号　作業名　　　　　　　　　　　ｈ〜の合計　　個人の作業時間数
>　　　　　　　　　　　　　　　　　　　　　　（数式）
>　　　　　　　　　　　　　　　　　　　　　　
>が　各シートに入っています。で、作業時間累計のシートは
>
>a　 　　b　 　　c 　　 d　 　　e 　　 f　 　　g　
>　　　作業番号　作業名　　　　　　　　　　　ｈ〜の合計　　となっています。
>
1行目はタイトル名で２行目からレコードが入っているのでしょうか？
実際に入っている値もサンプルとして記入して下さい。
それと現在のシートの状態と、マクロ処理後に取得したい値を代入するセルなども
お教え下さい。

(3)マクロ処理したい条件を具体的に説明をお願いします。
>同じ作業番号（作業名）なら作業時間を累計しｇ列へ、
作業番号が同じだと作業名も必ず同じなのでしょうか？


>また、違っていたら最後尾へコピーして追加したいのです。
最後尾とはどこになりますか？行の？列の？

>マクロ処理後の累計のシートを見るとｇ列に　値　ではなく、
>数式（SUM）が入っていました。
>ｈ列以降をコピーしていないので数式だと　0　になるのはそうだと思うんですが、
>ではどうすればいいのか…？？　
これは意味が？？？です。

−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−
>１シートにその日の作業No.と作業時間を作業日報として入力しています。
>これを日々累計していきたいのですが、
>下記のようなマクロでは作業時間が累計されません。
>ちなみに日々のシートではｈ列以降は個人の作業時間でｇ列はその合計です。
>（累計の方にCOPYしてないから？）

ご自分で決めた単語を使うときは、意味を書いていただかないと理解できません。

>作業No.　
>作業時間を作業日報
>これを日々累計
>作業時間が累計されません。
>日々のシート
>ｈ列以降は個人の作業時間
もっと具体的に何列にどのような値が入力されていて、
何行くらい入っているのかを明確にお願い致します。
上記のような単語を使われても、
ちーりんさんのパソコンを見れるわけではないので、さっぱり理解できないです。
【7209】Re:2表から項目一致なら合計し違ったら追加
お礼  ちーりん  - 03/8/26(火) 17:38 -
引用なし
パスワード
   ▼INA さん：
INAさん、本当にすみません。
説明することすらできません。
もう一度勉強しなおしてから改めて質問させていただきます。
今回はせっかくひらっていただいたのですが、
リタイアさせていただきます。
ごめんなさい。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
13069 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free