Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

46 / 76789

←次へ　｜　前へ→


	【82414】Re:weekdayを使用した合計金額と曜日ごとの日数の出し方

マナ - 24/12/8(日) 9:21 -


	引用なし

	パスワード

▼NANAMI さん：

1)

>intW = Weekday(DateSerial(Cells(i, 1), Cells(i, 2), Cells(i, 3)), vbMonday)

intW は、月曜日なら1、火曜日なら2、…、日曜日なら7

したがって、

>「Cells(intW + 1, ●)」

月曜日なら2行目、火曜日なら3行目、…、日曜日なら8行目に
集計結果を出すということ。

2)

>Cells(intW + 1, 7) = Cells(intW + 1, 7) + Cells(i, 4)

7列目（行は曜日別）に、4列目の値（売上金額）を加算

>Cells(intW + 1, 8) = Cells(intW + 1, 8) + 1

8列目（行は曜日別）に、1を加算

これすべてのデータで繰り返すことで、
売上の合計と日数を曜日別に行を変えて出力しています。

　　　

1 hits

▼

【82413】weekdayを使用した合計金額と曜日ごとの日数の出し方 NANAMI 24/12/7(土) 23:43