Dim BlackoutDates As Date Range Rem Blackout period is Jan. 1, 1999 to March 31, 1999, inclusive BlackoutDates = CDate(#12/31/1998#) _To CDate(#3/ 31/1999#) If CurrentDate In BlackoutDates Then formula = "Blackout" Else formula = "Free to trade" End If
|
Business Objects, SAP 子公司 http://www.taiwan.businessobjects.com/ 支援服務 http://www.taiwan.businessobjects.com/support/ 產品說明文件網站 http://support.businessobjects.com/documentation/ |