如何EXCEL通过第几周获得日期或者天（星期几）

EXCEL2003/2007/2010中，我们有时候需要知道了周，需要知道这一周的第1天（星期一）、第2天（星期二）、第3天（星期三）、第4天（星期四）、第5天（星期五）、第6天（星期六）、第7天（星期日,星期天）的日期。利用VBA，轻松两部就可以搞定，如果需要将其绑定为函数，请看我的参考资料链接。

前期准备工作（包括相关工具或所使用的原料等）

EXCEL

VBA

详细的操作方法或具体步骤

1、按“ALT+F11”两个按键，弹出VBA模式

右击Thisworkbook-插入-模块

拷贝下面代码到空白处，然后关闭VBA

Function week2Day(y As Integer, i As Integer, k As Integer) As String

Dim datetemp As Date, j As Integer

If i > 52 Then

MsgBox ("一年最多只有52个周！")

weekFristDay="1900-1-1"

Exit Function

End If

datetemp=y & "-" & 1 & "-" & 1

j=VBA.Weekday(datetemp, vbMonday)

j=(8 - j) + (i - 2) * 7

datetemp=DateAdd("d", j + k - 1, datetemp)

week2Day=CStr(datetemp)

End Function

在空单元格中输入下面函数

=week2day(2014,1,5) ‘其中第一个参数是年，第二个参数是第几周，第三个参数该周第几天，该函数返回为2014-1-3日

经验内容仅供参考，如果您需解决具体问题(尤其法律、医学等领域)，建议您详细咨询相关领域专业人士。作者声明：本教程系本人依照真实经历原创，未经许可，谢绝转载。