Makale DATEADD

Bu Makale Yararlı Oldu mu?

  • Evet

  • Hayır


Sonuçlar yalnızca oylamadan sonra görülebilir.
DATEADD( Interval, Number, Date )

Belirtilen bir zaman aralığı eklendiğinde Date ile döner. (Date)


Interval

Eklemek istediğiniz zaman aralığı (String):



"yyyy","YYYY" = yıl



"q","Q" = çeyrek



"m","M" = ay



"y","Y" = yılın günü



"d","D" = gün



"w","W" = haftanın günü



"ww","WW" = hafta



"h","H" = saat



"n","N" = dakika



"s","S" = saniye

Number

Eklenecek aralık sayısı (Long).

Date

Aralığa eklemek istediğiniz tarih (Date).


Açıklamalar
* Number herhangi bir sayısal ifade olabilir.
* Number uzun değilse, değerlendirilmeden önce en yakın tam sayıya yuvarlanır.
* Bu işlev hiçbir zaman geçersiz bir tarih vermeyecektir.
* Date'ten daha büyük bir zaman çıkarırsanız, bir hata oluşur.
* Döndürülecek tarihin biçimi, kontrol panelinden PC ayarları tarafından belirlenir.
* Bu işlev, bir tarihten belirli bir zaman aralığını eklemek veya çıkarmak için kullanılabilir.

Örnek Kullanım
PHP:
Sub ExcelTurkey()
    MsgBox DateAdd("m", 1, Now())
    MsgBox DateAdd("w", 2, Now())
    MsgBox DateAdd("h", 5, Now())
    MsgBox DateAdd("yyyy", 1, Now()) '= 10/06/2018 02:04:23
    MsgBox DateAdd("yyyy", 1, "01-01-2018") '= 1 / 1 / 2009
    MsgBox DateAdd("q", 1, "01-01-2018") ' = 1 / 4 / 2018
    MsgBox DateAdd("m", 1, "01-01-2018") ' = 1 / 2 / 2018
    MsgBox DateAdd("m", 1, "31-Oca-95") '= 28 / 2 / 1995 'Bu bir ay ekler
    MsgBox DateAdd("m", 1, Now()) '= 24/11/2018 16:47:29
    MsgBox DateAdd("y", 1, "01-01-2018") '= 2 / 1 / 2018
    MsgBox DateAdd("d", 1, "01-01-2018") ' = 2 / 1 / 2018
    MsgBox DateAdd("w", 1, "01-01-2018") ' = 2 / 1 / 2018
    MsgBox DateAdd("w", 5, "01-01-2018") ' = 6 / 1 / 2018
    MsgBox DateAdd("w", 2, Now()) ' = 12/06/2018 02:05:12
    MsgBox DateAdd("ww", 5, "01-01-2018") ' = 5 / 2 / 2018
    MsgBox DateAdd("h", 5, Now()) '= 10/06/2018 07:05:29
    MsgBox DateAdd("n", 5, Now()) '= 10/06/2018 02:10:29
    MsgBox DateAdd("s", 10, Now()) ' = 10/06/2018 02:06:39
    MsgBox DateAdd("m", 1, CDate("31 Oca 2018")) '
    Dim seri As Long
    seri = DateAdd("d", 1, "01/07/2018") '43283
End Sub
 
Son düzenleme:
Murat OSMA

Yorumlar

Üst Alt