Results of 1 - 1 of about 13161 for 日付 (0.003 sec.)
- [[20091125145134]]
- #score: 2423
- @digest: 41d4df635ab94e3783fd4c52c04a2262
- @id: 46560
- @mdate: 2009-11-26T02:26:57Z
- @size: 2907
- @type: text/plain
- #keywords: 付最 (19948), 信回 (18928), 応時 (16477), 信通 (14010), 発信 (11240), 話時 (10401), 着信 (10224), 面") (10195), 果") (9532), ン画 (9385), 手方 (8391), 通話 (8085), ザ() (7323), 計日 (7267), 訳集 (6955), 積算 (6881), 先() (6272), 秒数 (6162), 間() (5684), ・発 (5443), 方( (5391), 付( (5189), 付() (5124), 計結 (4363), 付毎 (4002), 月= (3010), 行+ (2966), 日= (2830), メイ (2556), 表組 (2548), 間= (2467), 相手 (2270)
- 『日付毎の集計と合計値の抽出』（MoonMan）
初めて質問させていただきます。 表題の質問ですが、CSVをADOでsheetに抽出後の展開で悩んでます。 本当は、CSVの抽出で一気にフィルタリングをかけて抽出したかたっのですが、 力不足で以下のような列で抽出しました。 A)ユーザ・日付・相手方(CD)・対応時間(秒) センター#1 200910121829 7051 55 このシートを B)集計日付・発信回数・発信通話時間 という表組みに集計しようとしています。 仕様としては、 1)日付は日次レベルでグループ化しする 2)開始日と終了日を別のシート(セル)から値を求める 2)日付毎で配列化し、その行数を求めて積算し、指定のセルに書き出す。 3)その配列の秒数を積算し、時間の単位で指定のセルに書き出す。 4)1時間に満たない場合は、00:NNとする。 5)データのない日付は、0で書き出す そこで、以下のコードを書き始めています。 - - - - Sub 仕訳集計() Dim ユーザ() As String Dim 日付() As String Dim 相手先() As String Dim 対応時間() As Integer Dim 集計日付() As String Dim 開始日(d, 1) 日付最終行 = Worksheet("sheet1").Cells(65536, 2).End(xlUp).Row ReDim 日付(日付最終行 + 1) ReDim 相手方(日付最終行 + 1) ReDim 対応時間(日付最終行 + 1) For i = 1 To 最終行 If Cells(i, 2).Value Then 日付(i) = Worksheet("sheet1").Cells(i, 2).Value Else 日付(i) = 日付(i - 1) End If 相手方(i) = Cells(i, 3).Value 秒数(i) = Cells(i, 4).Value Next 'ループした配列をグループ化して加工する 集計日 = Worksheet("集計結果").Range(A1).Cells(2.1) 発信回数 = Worksheet("集計結果").Range(A1).Cells(2.2) 発信通話時間 = Worksheet("集計結果").Range(A1).Cells(2.3) 着信回数 = Worksheet("集計結果").Range(A1).Cells(2.4) 着信時間 = Worksheet("集計結果").Range(A1).Cells(2.5) 開始月 = Worksheet("メイン画面").Cells(L15) '開始日 = Worksheet("メイン画面").Cells(Q15) 固定化するほうがよい 終了月 = Worksheet("メイン画面").Cells(X15) 終了日 = Worksheet("メイン画面").Cells(AC15) d = 1 For d = 1 To 終了日 If 日付(i) = d Then 'グループ化してカウント '行数の値を書き出し '秒数を時間に変換積算して書き出し 'オフセットして書き出し 'ループする End If Next とここまでは、考えましたが、煮詰まってしまいました。 どなたかすっきりした考え方をご教示ください。 Excel2003で作成しています。 ---- 回答が無いようなので軽くコメントを…… まず、仕様を見る限り集計部分はCOUNTIFやSUMIFなどの数式だけで出来そうな気がしますけども、 あくまでもマクロで処理しないと駄目なんですかね。 開始、終了の日付範囲が数式だけだと難しいかもしれないから、 そこはマクロで組むにしても、 集計だとかは表計算ソフトであるExcelさんの得意分野だと思うので、 マクロでわざわざ組むのが面倒というか勿体無いと言うか…… （ご近所PG）... - http://www.excel.studio-kazu.jp/wiki/kazuwiki/200911/20091125145134.txt - [detail] - similar
PREV
NEXT
Powered by Hyper Estraier 1.4.13, with 97023 documents and 608155 words.
訪問者：