會傳回指定年、月及日的 Variant (Date)。
語法
DateSerial ( 年、月、日 )
警告 請確定引數位於正確的值範圍內。 不正確引數可能會產生不正確的結果。
DateSerial函數語法具有下列引數:
引數 | 描述 |
---|---|
年 |
必要。 整數。 介於100和9999(含)之間的數位,或 數值運算式。 |
月 |
必要。 整數。 任何數值運算式。 |
之內 |
必要。 整數。 任何數值運算式。 |
註解
若要指定日期(例如1991年12月31日),每個DateSerial引數 的數位範圍應該在該單位的可接受範圍內。也就是說,天數為1到31,月份則是1到12個月。 不過,您也可以使用任何代表特定日期之前或之後的天數、月數或年數的數值運算式,來指定每個引數的相對日期。
下列範例會使用數值運算式,而不是絕對日期數位。 以下DateSerial函數會傳回 date,該日期是第一天之前的那一天(1 - 1)、8月之前的兩個月(8 - 2)、10年前1990(1990 - 10);換句話說,1980年5月31日。
DateSerial(1990 - 10, 8 - 2, 1 - 1)
年份 引數的兩位數年份是根據使用者定義的電腦設定來轉譯。 預設設定是介於0和29(含)之間的值,會轉譯為2000到2029年。 30與99之間的預設值會轉譯為1930至1999年。 針對所有其他年份引數,請使用四位數年份(例如,1800)。
Windows 2000 之前的 windows 版本會根據上述所述的預設值來轉譯兩位數的年份。 若要確認函數會傳回適當的值,請使用四位數的年份。
當任何引數超過該引數的接受範圍時,會視需要增加到下一個較大的單位。 例如,如果您指定35天,則會根據其套用年份中的位置,評估為一個月和數個工作日。 如果有任何單一引數超出範圍-32768 到32767,就會發生錯誤。 如果三個引數所指定的日期不在可接受的日期範圍內,就會發生錯誤。
附註: 針對年、 月和日,如果行事曆屬性設定是西曆,則會假定提供的值為西曆。 如果行事曆屬性設定是回曆,則會將提供的值視為回曆。
傳回的日期部分位於目前 Visual Basic 行事曆的時間範圍單位內。 例如,如果目前的行事曆是回曆,且要傳回的日期部分是年,則年份值是阿拉伯回曆年份。 對於引數年份而言,0與99(含)之間的值會轉譯為年份1400-1499。 針對所有其他年份值,請使用完整的四位數年份(例如,1520)。
查詢範例
運算式 | 結果 |
---|---|
從 ProductSales 中選取 [Dateserial] (2018,12,13) NewDate; |
傳回在函數的引數中輸入指定年份、月份和日期的 "date",並顯示在 [NewDate] 欄中。 結果: "13/12/2018"。 |
VBA 範例
附註: 下列範例示範如何在 Visual Basic for Applications (VBA) 模組中使用此函數。 如需使用 VBA 的詳細資訊,請在 [搜尋] 旁的下拉式清單中選取 [開發人員參考],並在 [搜尋] 方塊中輸入一個或多個字詞。
這個範例使用DateSerial函數傳回指定的年、月和日的日期。
Dim MyDate ' MyDate contains the date for February 12, 1969. MyDate = DateSerial(1969, 2, 12) ' Return a date.
附註: 本頁面是經由自動翻譯而成,因此文中可能有文法錯誤或不準確之處。 讓這些內容對您有所幫助是我們的目的。 告訴我們這項資訊是否有幫助? 這裡是供您參考的英文文章。