我试图从两个输入日期获得日期范围,例如:" 01.10.2016"和" 05.10.2016" (它是SAP中的日期格式)
我认为日期格式错误,如果错误,任何人都可以帮我解决如何将此格式转换为可接受的问题。
此外,我试图获取两个日期之间的所有日期,包括限制并将其用于自动化。如果有人知道如何让所有日期帮助我。
答案 0 :(得分:4)
DD.MM.YYYY
是德国使用的日期格式,SAP的总部位于德国。如果您使用的是正确的区域设置,则应该可以直接通过CDate
将日期字符串转换为日期。
s = "01.10.2016"
d = CDate(s)
如果这对您不起作用(因为您的区域设置不同),您可以例如在点处拆分字符串并通过DateSerial
从片段中构建日期:
s = "01.10.2016"
a = Split(s, ".")
d = DateSerial(a(2), a(1), a(0))
将字符串转换为日期值后,您可以通过从另一个中减去一个来计算两个日期之间的差异
delta = d2 - d1
或使用DateDiff
函数:
delta = DateDiff("d", d1, d2)
可以计算单个日期d1
到d2
,例如:
For i=0 To DateDiff("d", d1, d2)
WScript.Echo d1+i
Next