作者tial (我要做好好的坏人)
看板Visual_Basic
标题Re: [VBA ] 请问增加工作日
时间Wed Oct 28 12:54:56 2009
※ 引述《tial (我要做好好的坏人)》之铭言：
: 请问大家
: 如果我想要加某一天後的10个工作日
: 但我写DateAdd("w", 10, "2009/06/04") 他却会出现2009/06/14
: 等於直接加10天
: 请问该如何解决呢? 谢谢~~
不好意思~~我程式码用那个网页的方法改成这样
Dim setdate As String
Dim x As Date
Dim setdate1 As DateInterval
setdate1 = DateInterval.Weekday
setdate = "20090604"
x = DateSerial(Left(setdate, 4), Mid(setdate, 5, 2), Mid(setdate, 7, 2))
setdate1 = DateAdd(setdate1, 15, x)
可是它这行 setdate1 = DateAdd(setdate1, 15, x)
还是会出现"需要出现物件的错误讯息"
请问该如何解决呢? 谢谢~
--
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 114.137.40.167
1F：→ MOONRAKER:我弄错了，你是写VBA，那一页是给VB.NET用的 10/28 13:45
2F：→ MOONRAKER:而在VBA下，dateadd()的第一个引数给w或y或d结果都相同 10/28 13:45
3F：→ MOONRAKER:恐怕你只有自己写函数数日子一途 10/28 13:46