获取指定⽉份最后⼀天_【8】⼀天⼀个VBA函数学习-
DatePart
⼩伙伴⼉，⼤家好~~~今天再给各位带来另⼀个⽇期的计算函数——DatePart。这个函数⼲嘛⽤的呢？
【语法】
DatePart函数能够返回⽇期的指定部分
DatePart(interval,date[,firstdayofweek[,firstweekofyear]])，与DateDiff、DateAdd函数⽤法类似
【解释】
Interval：这个参数是必需的。可以采⽤以下的形式：
1. d：按天数计算
2. m：按⽉份计算
3. y：按天数计算(从)
4. yyyy：按年份计算
5. w：按照周的天序数计算(这个与DateAdd函数不同)
6. ww：按照星期计算
7. q：按照季度计算
8. h：按照⼩时计算
9. n：按照分钟计算(注意这⾥是n，不是m，m指的是⽉份，参照2)
10. s：按照秒钟计算
date：必需的⽇期参数
Firstdayofweek： 可选参数。指定⼀周开始的第⼀天是周⼏。它可以采取以下值：
1. 0 = vbUseSystemDayOfWeek：按照操作系统设定
2. 1 = vbSunday ：星期天
3. 2 = vbMonday ：星期⼀
4. 3 = vbTuesday ：星期⼆
5. 4 = vbWednesday ：星期三
vba自学好学吗
6. 5 = vbThursday ：星期四
7. 6 = vbFriday ：星期五
8. 7 = vbSaturday ：星期六
Firstweekofyear：可选参数。指定⼀年开始的第⼀周。 它可以采取以下值：
1. 0 = vbUseSystem ：按照操作系统设定
2. 1 = vbFirstJan1 ：从1⽉1⽇发⽣的那⼀周开始(默认)
3. 2 = vbFirstFourDays ：从新年⾄少有四天的⼀周开始
4. 3 = vbFirstFullWeek ：从新年的第⼀个整周开始
【⽰例】
插⼊⼀个模块，输⼊以下代码：
Sub DatePart函数⽰例()
Dim a As Date
Dim b, c, d, e, f, g, h, i, j, k
a = CDate("2019/4/6")
b = DatePart("d

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。