Excel公式练习93:计算1900年前的日期

excelperfect

引言:本文的练习整理自chandoo.org。多一些练习,想想自己怎么解决问题,看看别人又是怎解决的,能够快速提高Excel公式编写水平。

本次的练习是:给1900年前的日期加上或者减去一定的天数。示例数据如下图1所示,列A中的日期,加上或减去列B中的天数,返回正确的日期。

图1

假设所有的日期都使用mm/dd/yyyy格式,并且都大于0年。不应该使用任何辅助单元格、中间公式、命名区域或者VBA。

写下你的公式。

解决方案

公式1

在单元格C2中输入公式:

=REPLACE(TEXT(DATE(MID(A2,7,4)+2000,MID(A2,1,2)+0,MID(A2,4,2)+0)+B2,'MM/DD/YYYY'),7,4,YEAR(DATE(MID(A2,7,4)+2000,MID(A2,1,2)+0,MID(A2,4,2)+0)+B2)-2000)

向下拖放复制到数据末尾。

公式中:

DATE(MID(A2,7,4)+2000,MID(A2,1,2)+0,MID(A2,4,2)+0)

得到年份、月份和日,年份加上2000以满足Excel表示日期的要求。返回:

725014

再加上单元格B2中的天数,并传递到TEXT函数:

TEXT(725014+B2,'MM/DD/YYYY')

返回:

'02/05/3885'

公式中:

YEAR(DATE(MID(A2,7,4)+2000,MID(A2,1,2)+0,MID(A2,4,2)+0)+B2)-2000

解析为:

YEAR(725044)-2000

3885-2000

返回:

1885

这样,公式转换为:

REPLACE('02/05/3885',7,4,1885)

返回:

02/05/1885

公式2

在单元格C2中输入数组公式:

=TEXT(MONTH(DATE(RIGHT(A2,4)+1200,LEFT(A2,2)+0,MID(A2,4,2)+0)+B2),'00')& '/' &DAY(DATE(RIGHT(A2,4)+1200,LEFT(A2,2)+0,MID(A2,4,2)+0)+B2) & '/'& TEXT(YEAR(DATE(RIGHT(A2,4)+1200,LEFT(A2,2)+0,MID(A2,4,2)+0)+B2)-1200,'0000')

向下拖放复制到数据末尾。

参照公式1,对公式2进行深入理解。

(0)

相关推荐