在VBA中生成星期六的数量

Question

我是编码的新手,并希望帮助编写一个宏代码,用于生成每个月的星期六数,此时每个月的第一个日期已经列为excel文件中的范围.该文件应如下所示

Month   Weeks
1/1/2016    5
2/1/2016    4
3/1/2016    4
4/1/2016    5
5/1/2016    4
6/1/2016    4
7/1/2016    5
8/1/2016    4
9/1/2016    4
10/1/2016   5
11/1/2016   4
12/1/2016   4

Answer 1

我不清楚你为什么需要VBA.

作为工作表公式,

=NETWORKDAYS.INTL(A2, EOMONTH(A2, 0), "1111101")