VBAのやり方

感染者数、2019/12/29〜2020/11/1までの日別新規感染者数データを別シートの1週間ごとの曜日別新規感染者数にするコマンドボタンを作成したいです。

日別シートには、B3〜B220まで2000/01/01と記入されていて、C3〜C220まで人数が書いてあります。人数が0人時は0の記載がありません。

曜日別シートには、B3〜B25まで1週間ごとの数字が記載されています。B3には2019/12/29.B4には2020/1/5です。C2〜I2には曜日が入っています。
2020/1/5-2020/1/11は、2020年の第二週で1/5はセルD4、1/6はセルC5…1/11はI4 とシート曜日に入力したいです。

データを別のシートに転記させる方法とコマンドボタンを作成する際にMod関数を使いたいです。"VBA"でのやり方を教えて下さい。

質問者からの補足コメント

• >1週間ごとの新規感染者数
  
  日付と者数のみのデータから、別シートの縦列が1週間ごとの日付で横列が曜日になっている表にデータを転記したいです。
  
  >Mod関数について
  
  曜日判定にMod関数を使いたかったのですが、私の能力では出来ないと判断したため、weekday関数を使用しました。結果、日付から曜日を出すプログラムのコマンドボタンを作成することは出来ました。

  No.1の回答に寄せられた補足コメントです。 補足日時：2020/11/27 21:46

No.1 回答者： fujillin 回答日時： 2020/11/27 17:46

こんにちは

＞1週間ごとの曜日別新規感染者数
1週を曜日別に分けると、結局、日別になってしまいますけれど、もしかすると、曜日別に集計したいってことなのでしょうかね。
何をしたいのかよくわかりませんが、単純に集計するなり、振り分けるなりすればできそうに思いますけれど、どこがわからないのでしょうか？

＞コマンドボタンを作成する際にMod関数を使いたいです。
「コマンドボタンを作成する際」ってVBAからコマンドボタンを作ろうとしているのでしょうか？
想像するところ一回だけの処理でしょうから、やめておいた方が良さそうに思います。

あるいは、曜日判定にMod関数を使いたいという意味でしょうか？
日付のmodを取っても、分類はできても、曜日はわからないので、あまり有効な方法とは思えません。
日付から曜日を求めるのには、Weekday関数が用意されていますので、そちらを用いた方がよろしいかと思いますよ。