我有一栏应该说第1周,第2周,第3周或第4周。
我想使用VBA根据文本文件中的日期输入一周......
For Example:
12/19/2013
12/01/2013
12/08/2013
12/26/2013
Excel中的输出应为:
Week 3
Week 1
Week 2
Week 4
我想在" /"上使用Split之后的4个if语句然后将字符串转换为数字,以便可以通过if语句进行比较,但如果我有像#34; 01"或者" 03",从0开始的天数不会导致if语句比较出现问题?
在VBA中有一种简单的方法吗?
答案 0 :(得分:1)
答案 1 :(得分:1)
作为评论的后续行动,这个有效:
Dim myDate as Date
myDate = DateValue("12/01/2013")
MsgBox "Week " & (1 + DateDiff("ww", DateSerial(Year(myDate), Month(myDate), 1), myDate))