5个日期函数，不用看着日历数日子
 
1、算天数
 
包括算年龄、算工龄，算倒计时，算工作天数等，甚至各种花式放假情况下的工作天数，比如每周一周三周五休假，算每月的工作天数
 
算年龄，先把身份证上的出生日期提取出来，比如说用mid函数，提取身份证左起第6位，8个字符，mid（身份证单元格，6,8）
 
今天可以用today函数，=today（）不需要填充任何数据，回车即可取出当前电脑上今天的日期，year函数可以提取出年，month函数提取月份，day提取日期
 
日期在excel中是个很特殊的存在，有两个少为人知的特性，1、日期其实是数字，它的本质是一个从1900/1/1开始算起的天数，2、日期输入时，它的分隔符必须是正斜杠，或者是-，其他符号excel都无法识别，会看成文本
 
怎么判断是不是日期呢？点开数字格式里面的下拉选项，如果数字里面显示的是数字，那就是真日期，假日期则是一长串的文本
 
用年份相减来算年龄比较笼统，因为周岁是指从出生到计算时，共经历的生日数，如果要算周岁的话，要用函数DateDif(起始日，结束日，“时间类型”），时间类型有三个，Y代表年，M代表月，D代表日，这样就可以用来计算两个日期之间间隔的周年数，月数或者天数了。
 
例如=DateDif（1903/10/26，today（），“Y”），即可算出周岁，如果只用减法来算，很容易虚增年龄，所以一般在算退休年龄，工龄等严谨的数字的时候，用DateDif函数。
 
算工作天数
 
比如说2019-5-1和2019-8-31之间，自然日有多少天，双休情况下工作日多少天？单休情况下工作日多少天？
 
自然日可以用datedif，这么用=DateDif（2019-5-1,2019-8-31，“D”），D记得要用双引号
 
如果要计算双休情况下的工作日，用NetWorkDays，净工作天数的意思，就是周一到周五这五天，这个函数能自动去除掉五一这样的休息日。使用方法=NetWorkDays（起始日期,结束日期,[holidays]），在这个案例中的计算方法=NetWorkDays（2019-5-1,2019-8-31，[holidays]）
 
如果要指定休息日，要用函数 NetWorkDays.Intl带周末，使用方法=NetWorkDays.Intl（起始日期,结束日期,[周末],[holidays]）在这个案例中的计算方法=NetWorkDays.Intl（2019-5-1,2019-8-31，仅周日，[holidays]）
 
这个还可以用字串来做，100100,总共7位数，1表示放假，0表示工作，可以自由组合每周的工作和休息，放在函数中一定要带双引号=NetWorkDays.Intl（2019-5-1,2019-8-31，1000100，[holidays]），这样能灵活调整
 
注意：holidays可以是法定的节假日，也可以自己设定本单位的休息时间，单独列成一个清单
 
2、求日期
 
比如求交货日期，合同日期，开工日期等等，正推反推，工作日还是自然日都能算
 
如果按自然天算，直接加减就可以了，因为日期的本质就是数字
 
比如2019/5/1，工期25天，按照自然日算就是=2019/5/1+25就可以了
 
如果是按照工作日算，需要用到函数WorkDay，就是推算工作日的意思，用法是=WorkDay(开始日期，天数，假日列表)，这个函数跟NetWorkDays函数一样，只统计周一到周五
 
如果是要计算每周周日单休的话，需要用到WorkDays.Intl，用法是=WorkDays.Intl(开始日期，间隔日期，周末清单，假日列表)
 
指定日期，正推和倒推都是一样的，倒推就是把间隔天数写成负数就可以了，比如说制作工期14天，最后交货时间是2019/5/30，计算要从几号开始制作，=WorkDays.Intl（2019/5/30，-14，仅星期日，2019/5/1）
 
3、求星期
 
比如把日期转成星期显示，并显示是第几周
 
WeekNum函数，WeekNum（日期，[返回类型]），比如说5月30号是一年中的第几周？=WeekNum（2019/5/30，星期一），就可以得出来，这里星期一表示的是一周从星期一开始的
 
如果要算5月30号是星期几，可以用WeekDay函数，使用方法=WeekDay（日期，[返回类型]），=WeekDay（2019/5/30，星期一）
 
除了用weekday转星期，还有一个更好用的函数Text，它的作用是给数字化妆，让它按照指定的格式显示
 
使用方法是Text（数字，文本格式），比如说显示5月30号是星期几，可以这么来=Text（2019/5/30，“aaaa”）
 
如果说2019年5月30是星期五，四个a显示的是星期五，如果是三个a，则显示的是一个五
 
输入today函数就能得到今天的日期，快捷键是ctrl+；
 
输入now函数就能得到当前时间，快捷键是ctrl+shift+；
 
两个方法的差别在于，函数的值是动态的，会实时变动，按住F2刷新后，立刻能得到当前的时间，而快捷键输入的，是当时的时间，是一个静态数据，刷新不能实时更新
 
这是一张对照表。导零的意思就是数字前面后面为了对齐填充的0，比如说字符正常是8位，第1个就是00000001，如果没有导零就会显示1.虽然可以用文本格式来显示完全，但文本格式无法计算。
 
正确的设置方法是用text函数，公式为=Text（A2,"000000")，有多少个字符，就写多少个0，这样就能正常显示了。
 
还有一种方法就是设置单元格格式为自定义，在类型这两个字下面输入0，根据字符长度输入对应个数的0,6位数就输入000000。
 

 

  
 

情景: 
 批量将长日期如2016-12-06 19:21:04转为短日期2016/12/6。 
 如下： 
 
 
office2013下操作步骤：
 
全选要批量转换日期的区域 –> 数据 –> 分列 –> 文本列表向导选择“分隔符号”， 点击“下一步”–> 列数据格式选择“日期(YMD)”， 点击“完成”
 
截图如下 
  
 
 
最终结果如下图， 就是我们转换好的短日期： 
 
 
到此， 完成Excel2013批量将长日期转短日期。
 
OK， Enjoy it~

 
查了一下，这里比较齐全：
 
VBA 格式化字符串(记不大清楚时翻开看看)
 
http://club.excelhome.net/thread-962019-1-1.html
 
[转贴] 时光鸟 [转贴]
 
VBA 的 Format 函数与工作表函数 TEXT 用法基本相同，但功能更加强大，许多格式只能用于VBA 的 Format 函数，而不能用于工作表函数 TEXT ，以下是本人归纳的几点用法，希望对学习VBA有所裨益。
 
Format ( 值 , 格式(可选参数 ) )
 
一、数字格式：
 
1、General Number：普通数字，可以用来去掉千位分隔号和无效 0 。
 
如：Format("1,234,567.80", "General Number")="1234567.8"
 
2、Currency：货币类型，可添加千位分隔号和货币符号，保留两位小数点。
 
如：Format(1234567, "Currency")="1,234,567.00"
 
3、Fixed：格式为带两位小数的数字。
 
如：Format("123456", "Fixed")=123456.00
 
4、Standard：标准，即带千位分隔号和两位小数。
 
如：Format("123456", "Standard")=123,456.00
 
5、Percent：带两位小数点的百分数。
 
如：Format("123456", "Percent")=12345600.00
 
6、Scientific：科学记数法。
 
如：Format("1234567", "Scientific")=1.23E+06
 
7、Yes/No：当数值为非 0 数字时返回 Yes ，否则返回 No 。
 
"如：Format(-3.14, "Yes/No")="Yes"
 
Format(0, "Yes/No")="No"
 
8、True/False：当数值为非 0 数字时返回 True ，否则返回 False 。
 
与第7点类似，这里不再举例。
 
9、On/Off：当数值为非 0 数字时返回 On ，否则返回 Off 。
 
与第7点类似，这里不再举例。
 
10、""或省略：返回原值，但去除了小数点前后的无效 0 。
 
如：Format("0.1030", "")=".103"
 
11、0：占位格式化，不足位时补足 0 。
 
"如：Format(123, "0000")="0123"
 
Format$(12.3, "0.00")="12.30"
 
12、#：占位格式化，不足位时不补足 0 。
 
如：Format(123, "####")=123
 
13、%：转化为百分数，一个%代表乘以 100 。
 
如：Format(1.23, "0.00%")=123.00%
 
Format(1.23, "0.00%%")=12300.00%%
 
14、\：强制显示某字符。
 
如：Format$(12.34, "\R\M\B .00")="RMB 12.34"
 
15、;(分号)：分段显示不同格式
 
比如要把正数显示为“正”，负数显示为“负”，0显示为“零”，参数为"正;负;零"
 
如：Format$(123, "正;负;零")="正"
 
第1段为正数格式，第2段为负数格式，第3段为0格式。
 
二、日期和时间格式：
 
1、固定格式参数
 
General Date：基本类型
 
如：Format("2010-5-1 9:8:5", "General Date")="2010/5/1 9:08:05"
 
Long Date：操作系统定义的长日期
 
如：Format("2010-5-1 9:8:5", "Long Date")=2010年5月1日
 
Medium Date：中日期
 
如：Format("2010-5-1 9:8:5", "Medium Date")=10-05-01
 
Short Date：操作系统定义的短日期
 
如：Format("2010-5-1 9:8:5", "Short Date")=2010-5-1
 
Long Time：操作系统定义的长时间
 
如：Format("2010-5-1 9:8:5", "Long Time")=9:08:05
 
Medium Time:带AM/PM(上午/下午)的12小时制，不带秒
 
如：Format("2010-5-1 9:8:5", "Medium Time")=09:08 上午
 
Short Time：24时制的时间，不带秒
 
如：Format("2010-5-1 9:8:5", "Short Time")=09:08
 
2、自定义格式
 
C：格式化为国标的日期和时间
 
如：Format("2010-5-1 9:8:5", "c")=2010/5/1 9:08:05
 
y:一年中的第几天(1-366)
 
如：Format("2010-5-1 9:8:5", "y")=121
 
yy：两位数的年份(00-99)
 
如：Format("2010-5-1 9:8:5", "yy")=10
 
yyy：上面的 yy 与 y 结合在一起
 
"如：Format("2010-5-1 9:8:5", "yyy")=10121
 
Format("2010-5-1 9:8:5", "yy年第y天")=10年第121天
 
yyyy：四位数的年份(0100-9999)
 
如：Format("2010-5-1 9:8:5", "yyyy")=2010
 
d：一个月中的第几天(1-31)
 
如：Format("2010-5-1 9:8:5", "d")=1
 
dd：与 d 相同，但不足两位时补足 0
 
如：Format("2010-5-1 9:8:5", "dd")=01
 
ddd：三个英文字母表示的星期几
 
如：Format("2010-5-1 9:8:5", "ddd")="Sat"
 
dddd：英文表示的星期几
 
如：Format("2010-5-1 9:8:5", "dddd")="Saturday"
 
ddddd：显示标准日期
 
如：Format("2010-5-1 9:8:5", "ddddd")=2010/5/1
 
dddddd：长日期
 
如：Format("2010-5-1 9:8:5", "dddddd")=2010年5月1日
 
w：一个星期中的第几天(始于周日，周日为1)
 
如：Format("2010-5-1 9:8:5", "w")=7
 
ww：一年中的第几周
 
如：Format("2010-5-1 9:8:5", "ww")=18
 
m：月份数(当用于时间时，也可以表时为分钟)
 
如：Format("2010-5-1 9:8:5", "m")=5
 
mm：当小于10时带前导0的月数(当用于时间时，也可以表示为两位数的分钟数)
 
如：Format("2010-5-1 9:8:5", "mm")=05
 
mmm：三个英文字母表示的月份数
 
如：Format("2010-1-1 9:8:5", "mmm")="Jan"
 
mmmm：英文表示的月份数
 
如：Format("2010-1-1 9:8:5", "mmmm")="January"
 
q：一年中的第几季(1-4)
 
如：Format("2010-5-1 9:8:5", "q")=2
 
aaa：中文表示的周几
 
如：Format("2010-5-1 9:8:5", "aaa")=周六
 
aaaa：中文表示的星期几
 
如：Format("2010-5-1 9:8:5", "aaaa")=星期六
 
h：小时数(0-23)
 
如：Format("2010-5-1 9:8:5", "h")=9
 
h：两位数表示的小时数
 
如：Format("2010-5-1 9:8:5", "hh")=09
 
n：分钟数(0-59)
 
如：Format("2010-5-1 9:8:5", "n")=8
 
nn：两位数表示的分钟数(00-59)
 
如：Format("2010-5-1 9:8:5", "nn")=08
 
s：秒数(0-59)
 
如：Format("2010-5-1 9:8:5", "s")=5
 
ss：两位数表示的秒数(00-59)
 
如：Format("2010-5-1 9:8:5", "ss")=05
 
ttttt:标准时间，当小时数小于10时不带0，与 h:mm:ss 或 h:nn:ss 相同
 
如：Format("2010-5-1 9:8:5", "ttttt")=9:08:05
 
AM/PM：显示当前为AM或PM
 
如：Format("2010-5-1 11:59:59", "AM/PM")=AM
 
Format("2010-5-1 12:0:0", "AM/PM")=PM
 
A/P：显示当前为A或P
 
与 AM/PM 一样，这里不再举例。
 
说明：
 
可以多种格式联合使用，如：
 
Format("2010-5-1 9:8:5", "dddddd aaaa")=2010年5月1日 星期六
 
三、文本格式
 
@：匹配位置插入格式化文本，如：
 
在"abcde"前插入文本"X"，代码为：Format("abcde", "X@")=Xabcde
 
在"abcde"第1位字符后面插入文本"X"，代码为：Format("abcde", "@X")=aXbcde
 
在"abcde"第2位字符后面插入文本"X"，代码为：Format("abcde", "@@X")=abXcde
 
在"abcde"第3位字符后面插入文本"X"，代码为：Format("abcde", "@@@X")=abcXde
 
当点位符@比原文本字符串多时，刚在相应位置上添加空格，如：
 
Format("abc", "X@@@@")="X abc"
 
Format("abc", "X@@@@@")="X  abc"
 
Format("t", "@@a@")="  at"(空格空格at)
 
与!配合可从后面截取一段文本，如：
 
截取"abcde"后面1个字符文本，代码为：Format("abcde", "!@")=e
 
截取"abcde"后面2个字符文本，代码为：Format("abcde", "!@@")=de
 
截取"abcde"后面3个字符文本，代码为：Format("abcde", "!@@@")=cde
 
截取"abcde"后面两位，并在前面添加"XY"，代码为：Format("abcde", "!XY@@")=Xyde
 
&：字符占位符，与@基本相同，这里不再赘述。
 
如：Format$("I Love You", "
 
>：强制将所有字符以大写格式显示。
 
如：Format$("I Love You", ">")=I LOVE YOU
 
查了一下，这里比较齐全：
 
VBA 格式化字符串(记不大清楚时翻开看看)
 
http://club.excelhome.net/thread-962019-1-1.html
 
[转贴] 时光鸟 [转贴]
 
VBA 的 Format 函数与工作表函数 TEXT 用法基本相同，但功能更加强大，许多格式只能用于VBA 的 Format 函数，而不能用于工作表函数 TEXT ，以下是本人归纳的几点用法，希望对学习VBA有所裨益。
 
Format ( 值 , 格式(可选参数 ) )
 
一、数字格式：
 
1、General Number：普通数字，可以用来去掉千位分隔号和无效 0 。
 
如：Format("1,234,567.80", "General Number")="1234567.8"
 
2、Currency：货币类型，可添加千位分隔号和货币符号，保留两位小数点。
 
如：Format(1234567, "Currency")="1,234,567.00"
 
3、Fixed：格式为带两位小数的数字。
 
如：Format("123456", "Fixed")=123456.00
 
4、Standard：标准，即带千位分隔号和两位小数。
 
如：Format("123456", "Standard")=123,456.00
 
5、Percent：带两位小数点的百分数。
 
如：Format("123456", "Percent")=12345600.00
 
6、Scientific：科学记数法。
 
如：Format("1234567", "Scientific")=1.23E+06
 
7、Yes/No：当数值为非 0 数字时返回 Yes ，否则返回 No 。
 
"如：Format(-3.14, "Yes/No")="Yes"
 
Format(0, "Yes/No")="No"
 
8、True/False：当数值为非 0 数字时返回 True ，否则返回 False 。
 
与第7点类似，这里不再举例。
 
9、On/Off：当数值为非 0 数字时返回 On ，否则返回 Off 。
 
与第7点类似，这里不再举例。
 
10、""或省略：返回原值，但去除了小数点前后的无效 0 。
 
如：Format("0.1030", "")=".103"
 
11、0：占位格式化，不足位时补足 0 。
 
"如：Format(123, "0000")="0123"
 
Format$(12.3, "0.00")="12.30"
 
12、#：占位格式化，不足位时不补足 0 。
 
如：Format(123, "####")=123
 
13、%：转化为百分数，一个%代表乘以 100 。
 
如：Format(1.23, "0.00%")=123.00%
 
Format(1.23, "0.00%%")=12300.00%%
 
14、\：强制显示某字符。
 
如：Format$(12.34, "\R\M\B .00")="RMB 12.34"
 
15、;(分号)：分段显示不同格式
 
比如要把正数显示为“正”，负数显示为“负”，0显示为“零”，参数为"正;负;零"
 
如：Format$(123, "正;负;零")="正"
 
第1段为正数格式，第2段为负数格式，第3段为0格式。
 
二、日期和时间格式：
 
1、固定格式参数
 
General Date：基本类型
 
如：Format("2010-5-1 9:8:5", "General Date")="2010/5/1 9:08:05"
 
Long Date：操作系统定义的长日期
 
如：Format("2010-5-1 9:8:5", "Long Date")=2010年5月1日
 
Medium Date：中日期
 
如：Format("2010-5-1 9:8:5", "Medium Date")=10-05-01
 
Short Date：操作系统定义的短日期
 
如：Format("2010-5-1 9:8:5", "Short Date")=2010-5-1
 
Long Time：操作系统定义的长时间
 
如：Format("2010-5-1 9:8:5", "Long Time")=9:08:05
 
Medium Time:带AM/PM(上午/下午)的12小时制，不带秒
 
如：Format("2010-5-1 9:8:5", "Medium Time")=09:08 上午
 
Short Time：24时制的时间，不带秒
 
如：Format("2010-5-1 9:8:5", "Short Time")=09:08
 
2、自定义格式
 
C：格式化为国标的日期和时间
 
如：Format("2010-5-1 9:8:5", "c")=2010/5/1 9:08:05
 
y:一年中的第几天(1-366)
 
如：Format("2010-5-1 9:8:5", "y")=121
 
yy：两位数的年份(00-99)
 
如：Format("2010-5-1 9:8:5", "yy")=10
 
yyy：上面的 yy 与 y 结合在一起
 
"如：Format("2010-5-1 9:8:5", "yyy")=10121
 
Format("2010-5-1 9:8:5", "yy年第y天")=10年第121天
 
yyyy：四位数的年份(0100-9999)
 
如：Format("2010-5-1 9:8:5", "yyyy")=2010
 
d：一个月中的第几天(1-31)
 
如：Format("2010-5-1 9:8:5", "d")=1
 
dd：与 d 相同，但不足两位时补足 0
 
如：Format("2010-5-1 9:8:5", "dd")=01
 
ddd：三个英文字母表示的星期几
 
如：Format("2010-5-1 9:8:5", "ddd")="Sat"
 
dddd：英文表示的星期几
 
如：Format("2010-5-1 9:8:5", "dddd")="Saturday"
 
ddddd：显示标准日期
 
如：Format("2010-5-1 9:8:5", "ddddd")=2010/5/1
 
dddddd：长日期
 
如：Format("2010-5-1 9:8:5", "dddddd")=2010年5月1日
 
w：一个星期中的第几天(始于周日，周日为1)
 
如：Format("2010-5-1 9:8:5", "w")=7
 
ww：一年中的第几周
 
如：Format("2010-5-1 9:8:5", "ww")=18
 
m：月份数(当用于时间时，也可以表时为分钟)
 
如：Format("2010-5-1 9:8:5", "m")=5
 
mm：当小于10时带前导0的月数(当用于时间时，也可以表示为两位数的分钟数)
 
如：Format("2010-5-1 9:8:5", "mm")=05
 
mmm：三个英文字母表示的月份数
 
如：Format("2010-1-1 9:8:5", "mmm")="Jan"
 
mmmm：英文表示的月份数
 
如：Format("2010-1-1 9:8:5", "mmmm")="January"
 
q：一年中的第几季(1-4)
 
如：Format("2010-5-1 9:8:5", "q")=2
 
aaa：中文表示的周几
 
如：Format("2010-5-1 9:8:5", "aaa")=周六
 
aaaa：中文表示的星期几
 
如：Format("2010-5-1 9:8:5", "aaaa")=星期六
 
h：小时数(0-23)
 
如：Format("2010-5-1 9:8:5", "h")=9
 
h：两位数表示的小时数
 
如：Format("2010-5-1 9:8:5", "hh")=09
 
n：分钟数(0-59)
 
如：Format("2010-5-1 9:8:5", "n")=8
 
nn：两位数表示的分钟数(00-59)
 
如：Format("2010-5-1 9:8:5", "nn")=08
 
s：秒数(0-59)
 
如：Format("2010-5-1 9:8:5", "s")=5
 
ss：两位数表示的秒数(00-59)
 
如：Format("2010-5-1 9:8:5", "ss")=05
 
ttttt:标准时间，当小时数小于10时不带0，与 h:mm:ss 或 h:nn:ss 相同
 
如：Format("2010-5-1 9:8:5", "ttttt")=9:08:05
 
AM/PM：显示当前为AM或PM
 
如：Format("2010-5-1 11:59:59", "AM/PM")=AM
 
Format("2010-5-1 12:0:0", "AM/PM")=PM
 
A/P：显示当前为A或P
 
与 AM/PM 一样，这里不再举例。
 
说明：
 
可以多种格式联合使用，如：
 
Format("2010-5-1 9:8:5", "dddddd aaaa")=2010年5月1日 星期六
 
三、文本格式
 
@：匹配位置插入格式化文本，如：
 
在"abcde"前插入文本"X"，代码为：Format("abcde", "X@")=Xabcde
 
在"abcde"第1位字符后面插入文本"X"，代码为：Format("abcde", "@X")=aXbcde
 
在"abcde"第2位字符后面插入文本"X"，代码为：Format("abcde", "@@X")=abXcde
 
在"abcde"第3位字符后面插入文本"X"，代码为：Format("abcde", "@@@X")=abcXde
 
当点位符@比原文本字符串多时，刚在相应位置上添加空格，如：
 
Format("abc", "X@@@@")="X abc"
 
Format("abc", "X@@@@@")="X  abc"
 
Format("t", "@@a@")="  at"(空格空格at)
 
与!配合可从后面截取一段文本，如：
 
截取"abcde"后面1个字符文本，代码为：Format("abcde", "!@")=e
 
截取"abcde"后面2个字符文本，代码为：Format("abcde", "!@@")=de
 
截取"abcde"后面3个字符文本，代码为：Format("abcde", "!@@@")=cde
 
截取"abcde"后面两位，并在前面添加"XY"，代码为：Format("abcde", "!XY@@")=Xyde
 
&：字符占位符，与@基本相同，这里不再赘述。
 
如：Format$("I Love You", "
 
>：强制将所有字符以大写格式显示。
 
如：Format$("I Love You", ">")=I LOVE YOU

 

 
时间函数汇总1.Cdate(日期表达式)
 
将日期表达式转换成日期类型的数据。
 
日期表达式是任何可以解释成日期的表达式，包含日期文字，可以看作日期的字符串以及从函数返回的日期。
 
比如：myDate = CDate("99-5-20")   ，这样的日期表达式必须加双引号，否则结果不可预料。
 
CDate 依据系统上的区域设置来决定日期的格式。如果提供的格式为不可识别的日期设置，则不能正确判断年、月、日的顺序。
 
2.Now()
 
返回当前计算机系统设置的日期和时间。
 
3.Year(日期表达式)
 
返回表示年份的整数。
 
比如：Year("00-6-15") = 2000
 
4.Month(日期表达式)
 
返回 1 到 12 之间的整数，表示一年中的某月。
 
比如：Month("00-6-15") = 6
 
5.DateAdd(interval, number, date)
 
DateAdd 函数语法中有下列命名参数：
 
部分                     描述
 
interval   必要。字符串表达式，是所要加上去的时间间隔。
 
number     必要。数值表达式，是要加上的时间间隔的数目。其数值可以为正数(得到未来的日期)，也可以为负数(得到过去的日期)。
 
date       必要。Variant (Date) 或表示日期的文字，这一日期还加上了时间间隔。
 
设置 interval 参数具有以下设定值：
 
设置   描述
 
yyyy   年
 
q       季
 
m       月
 
y      一年的日数
 
d       日
 
w      一周的日数
 
ww     周
 
h        时
 
n       分钟
 
s       秒
 
说明
 
可以使用 DateAdd 函数对日期加上或减去指定的时间间隔。
 
例如，可以用 DateAdd 来计算距今天为三十天的日期；或者计算距现在为 45 分钟的时间。
 
为了对 date 加上“日”，可以使用“一年的日数” (“y”)，“日” (”d”) 或“一周的日数” (”w”)。
 
DateAdd 函数将不返回有效日期。在以下实例中将 1 月31 日加上一个月：
 
DateAdd(m, 1, 31-Jan-95)
 
上例中，DateAdd 返回 1995 年 2 月 28 日，而不是 1995 年 2 月 31 日。
 
如果 date 是 1996 年 1 月 31 日，则由于 1996 年是闰年，返回值是 1996 年 2 月 29 日。
 
如果计算的日期超前 100 年(减去的年度超过 date 中的年份)，就会导致错误发生。
 
如果 number 不是一个 Long 值，则在计算时取最接近的整数值来计算。
 
注意   DateAdd 返回值的格式由 Control Panel设置决定，而不是由传递到date 参数的格式决定。
 
事例：
 
DateAdd("d",10,"2000-6-18")
 
结果是： 2000-06-28
 
DateAdd("m",-1,"2000-6-18")
 
结果是： 2000-05-18
 
6、DateDiff 函数
 
返回 Variant (Long) 的值，表示两个指定日期间的时间间隔数目。
 
语法 DateDiff(interval, date1, date2[, firstdayofweek[, firstweekofyear]])
 
DateDiff 函数语法中有下列命名参数：
 
部分 描述
 
interval 必要。字符串表达式，表示用来计算date1 和 date2 的时间差的时间间隔
 
Date1□date2 必要；Variant (Date)。计算中要用到的两个日期。
 
Firstdayofweek 可选。指定一个星期的第一天的常数。如果未予指定，则以星期日为第一天。
 
firstweekofyear 可选。指定一年的第一周的常数。如果未予指定，则以包含 1 月 1 日的星期为第一周。
 
interval 参数的设定值同DateAdd函数，请参考上面的例子。
 
例：DateDiff("d",#2004-01-06#,#2004-01-07#)     1
 
7、DatePart 函数
 
返回一个包含已知日期的指定时间部分的 Variant (Integer)。
 
语法 DatePart(interval, date[,firstdayofweek[, firstweekofyear]])
 
DatePart 函数语法中有下列命名参数：
 
部分 描述
 
interval 必要。字符串表达式，是要返回的时间间隔。
 
date 必要。要计算的 Variant (Date) 值。
 
Firstdayofweek 可选。指定一个星期的第一天的常数。如果未予指定，则以星期日为第一天。
 
firstweekofyear 可选。指定一年第一周的常数。如果未予指定，则以包含 1 月 1 日的星期为第一周。
 
设置
 
interval 参数的设定值同DateAdd()
 
DatePart 函数示例本示例先取得一个日期，然后使用 DatePart 函数显示该日期是发生在该年的哪一季。
 
Dim TheDate As Date    ' 声明变量。
 
Dim Msg
 
TheDate = InputBox("Enter a date:")
 
Msg = "季度: " & DatePart("q", TheDate)
 
MsgBox Msg
 
8、DateSerial 函数
 
返回包含指定的年、月、日的 Variant (Date)。
 
语法 DateSerial(year, month, day)
 
DateSerial 函数语法有下列的命名参数：
 
部分 描述
 
year 必要；Integer。从 100 到 9999 间的整数，或一数值表达式。
 
month 必要；Integer。任何数值表达式。
 
day 必要；Integer。任何数值表达式。
 
说明
 
为了指定某个日期，如 1991 年 12 月 31 日，DateSerial 函数中的每个参数的取值范围应该是可接受的；即，日的取值范围应在 1-31 之间，而月的取值范围应在 1-12 之间。但是，当一个数值表达式表示某日之前或其后的年、月、日数时，也可以为每个使用这个数值表达式的参数指定相对日期。
 
以下示例中使用了数值表达式代替绝对日期。这里，DateSerial 函数返回 1990 年 8 月 1 日的 十 年 (1990 - 10) 零两个月 (8 - 2) 又一天 (1 - 1) 之前的日期；换句话说，就是 1980 年 5 月 31 日。
 
DateSerial(1990 - 10, 8 - 2, 1 - 1)
 
year 参数的数值若介于 0 与 29 之间，则将其解释为 2000–2029年，若介于 30 和 99 之间则解释为1930–1999年。而对所有其它 year 参数，则请用四位数值表示(如 1800)。 当任何一个参数的取值超出可接受的范围时，它会适时进位到下一个较大的时间单位。
 
例如，如果指定了 35 天，则这个天数被解释成一个月加上多出来的日数，多出来的日数将由其年份与月份来决定。
 
如果一个参数值超出 -32，768 到 32，767 的范围，就会导致错误发生。
 
DateSerial 函数示例本示例使用
 
DateSerial 函数来将指定的年月日转换为 Date 类型的表达式。
 
Dim MyDate ' MyDate 的值为 February 12，1969， Date 类型。
 
MyDate = DateSerial(1969, 2, 12)    ' 返回日期。
 
9、DateValue 函数
 
返回一个 Variant (Date)。
 
语法
 
DateValue(date)
 
必要的 date 参数
 
date 通常是字符串表达式，表示从 100 年 1 月 1 日到 9999 年 12 月 31 日之间的一个日期。但是，date 也可以是任何表达式，其所代表的日期、时间在上述范围内。
 
说明
 
如果 date 是一个字符串，且其内容只有数字以及分隔数字的日期分隔符，则 DateValue 就会根据系统中指定的短日期格式来识别月、日、年的顺序。
 
DateValue 也识别明确的英文月份名称，全名或缩写均可。
 
例如，除了 12/30/1991 和 12/30/91 之外，DateValue 也识别 December 30, 1991 和 Dec 30, 1991。
 
如果 date 中略去了年这一部分，DateValue 就会使用由计算机系统日期设置的当前年份。 如果 date 参数包含时间信息，则 DateValue 不会返回它。但是，如果 date 包含无效时间信息(如 89:98)，则会导致错误发生。
 
DateValue 函数示例本示例使用
 
DateValue 函数将字符串转换为日期。也可以使用日期原义直接 给 Variant 或 Date 类型的变量赋值日期，例如 MyDate = #2/12/69# 。
 
Dim MyDate
 
MyDate = DateValue("February 12, 1969")    ' 返回日期。
 
10、WeekdayName函数
 
描述 返回一个字符串，表示一星期中的某天。
 
语法 WeekdayName(weekday, abbreviate, firstdayofweek)
 
WeekdayName函数语法有如下几部分：
 
部分 描述
 
weekday 必需的。数字值，表示一星期中的某天。该数字值要依赖于firstdayofweek设置中的设置值来决定。
 
abbreviate 可选的。Boolean值，表示星期的名称是否被缩写。如果忽略该值，缺省值为False，表明星期的名称不能被缩写。
 
firstdayofweek 可选的。数字值，表示一星期中第一天。关于其值，请参阅“设置值”部分。
 
设置值 firstdayofweek参数值如下：
 
常数 值 描述
 
vbUseSystem 0 使用本国语言支持 (NLS) API设置值。
 
vbSunday 1 星期日(缺省)。
 
vbMonday 2 星期一
 
vbTuesday 3 星期二
 
vbWednesday 4 星期三
 
vbThursday 5 星期四
 
vbFriday 6 星期五
 
vbSaturday 7 星期六
 
11、Weekday 函数
 
返回一个 Variant (Integer)，包含一个整数，代表某个日期是星期几。
 
语法 Weekday(date, [firstdayofweek])
 
Weekday 函数语法有下列的命名参数：
 
部分 描述
 
date 必要。能够表示日期的 Variant、数值表达式、字符串表达式或它们的组合。如果 date 包含 Null，则返回 Null。
 
Firstdayofweek 可选。指定一星期第一天的常数。如果未予指定，则以 vbSunday 为缺省值。
 
设置 firstdayofweek 参数有以下设定值：
 
常数 值 描述
 
vbUseSystem 0 使用 NLS API 设置。
 
VbSunday 1 星期日(缺省值)
 
vbMonday 2 星期一
 
vbTuesday 3 星期二
 
vbWednesday 4 星期三
 
vbThursday 5 星期四
 
vbFriday 6 星期五
 
vbSaturday 7 星期六 返回值
 
Weekday 函数可以返回以下诸值：
 
常数 值 描述
 
vbSunday 1 星期日
 
vbMonday 2 星期一
 
vbTuesday 3 星期二
 
vbWednesday 4 星期三
 
vbThursday 5 星期四
 
vbFriday 6 星期五
 
vbSaturday 7 星期六
 
如果没能帮到你请参考：http://bbs.office-cn.net/dispbbs.asp?BoardID=142&replyID=167465&id=33813&skin=0
 
「知无不言.言无不尽.百人誉之不加密.百人毁之不加疏.」-- 诸葛廷栋
 
◆◆
 
评论读取中....
 
请登录后再发表评论!
 
◆◆
 
修改失败，请稍后尝试