Μετάβαση στο κύριο περιεχόμενο
Office

Συνάρτηση DateAdd

Επιστρέφει μια Μεταβλητή (Ημερομηνία) που περιέχει μια ημερομηνία στην οποία έχει προστεθεί ένα καθορισμένο χρονικό διάστημα.

Σύνταξη

DateAdd ( διάστημα; αριθμός ; ημερομηνία)

Η σύνταξη της συνάρτησης DateAdd περιλαμβάνει τα παρακάτω ορίσματα:

Όρισμα

Περιγραφή

interval

Υποχρεωτικό. Παράσταση συμβολοσειράς που είναι το χρονικό διάστημα που θέλετε να προσθέσετε.

αριθμός

Υποχρεωτικό. Αριθμητική παράσταση που είναι ο αριθμός των χρονικών διαστημάτων που θέλετε να προσθέσετε. Μπορεί να είναι θετικός (για τις μελλοντικές ημερομηνίες) ή αρνητικός (για ημερομηνίες στο παρελθόν).

ημερομηνία

Υποχρεωτικό. Παραλλαγή (Ημερομηνία) ή κυριολεκτική αναπαράσταση της ημερομηνίας στην οποία προστίθεται το διάστημα.

Συμβουλή:  Στην Access 2010, η Δόμηση παραστάσεων έχει το IntelliSense, ώστε να μπορείτε να δείτε ποια ορίσματα απαιτεί η έκφρασή σας. 

Ρυθμίσεις

Το χρονικό διάστημαόρισμα έχει αυτές τις ρυθμίσεις:

Ρύθμιση

Περιγραφή

εεεε

Έτος

τ

Τρίμηνο

μ

Μήνας

y

Ημέρα του έτους

η

Ημέρα

β

Weekday

ββ

Εβδομάδα

ω

Ώρα

λ

Λεπτό

δ

Δευτερόλεπτο

Παρατηρήσεις

Μπορείτε να χρησιμοποιήσετε τη συνάρτηση DateAdd για να προσθέσετε ή να αφαιρέσετε ένα καθορισμένο χρονικό διάστημα από μια ημερομηνία. Για παράδειγμα, μπορείτε να χρησιμοποιήσετε το DateAdd για να υπολογίσετε μια ημερομηνία 30 ημέρες από σήμερα ή μια ώρα 45 λεπτά από τώρα.

Για να προσθέσετε ημέρες μέχρι σήμερα, μπορείτε να χρησιμοποιήσετε την ημέρα του έτους ("y"), Day ("d") ή εργάσιμη ημέρα ("w").

Η συνάρτηση DateAdd δεν θα επιστρέψει μια μη έγκυρη ημερομηνία. Το παρακάτω παράδειγμα προσθέτει έναν μήνα στις 31 Ιανουαρίου:

DateAdd("m", 1, "31-Jan-95")

Σε αυτή την περίπτωση, το DateAdd επιστρέφει 28-φεβ-95, όχι 31-φεβ-95. Εάν η ημερομηνία είναι 31-Jan-96, επιστρέφει 29-φεβ-96 επειδή το 1996 είναι δίσεκτο έτος.

Εάν η υπολογιζόμενη ημερομηνία προηγείται του έτους 100 (δηλαδή, αφαιρείτε περισσότερα έτη από αυτά που βρίσκονται σε ημερομηνία), παρουσιάζεται σφάλμα.

Εάν ο αριθμός δεν είναι μεγάλη τιμή, στρογγυλοποιείται στον πλησιέστερο ακέραιο αριθμό πριν από την αξιολόγησή του.

Σημείωση:  Η μορφή της τιμής επιστροφής για το DateAdd καθορίζεται από τις ρυθμίσεις του πίνακα ελέγχου και όχι από τη μορφή που μεταβιβάζεται στο όρισμα Date .

Σημείωση:  Για την ημερομηνία, εάν η ρύθμιση της ιδιότητας Calendar είναι Γρηγοριανό, η παρεχόμενη ημερομηνία πρέπει να είναι Γρηγοριανό. Εάν το ημερολόγιο είναι Χίζρι, η παρεχόμενη ημερομηνία πρέπει να είναι Χίζρι. Εάν οι τιμές μήνα είναι ονόματα, το όνομα πρέπει να είναι συνεπές με τη ρύθμιση της τρέχουσας ιδιότητας του ημερολογίου . Για να ελαχιστοποιήσετε τη δυνατότητα των ονομάτων μηνών να έρχονται σε διένεξη με τη ρύθμιση της τρέχουσας ιδιότητας του ημερολογίου , εισαγάγετε αριθμητικές τιμές μήνα (σύντομη μορφή ημερομηνίας).

Παραδείγματα ερωτημάτων

Παράσταση

Αποτελέσματα

Επιλέξτε DateAdd ("εεεε", 1, [DateofSale]) ως Έκφρ1 από το ProductSales.

Επιστρέφει τα αποτελέσματα προσθέτοντας 1 έτος στις τιμές ημερομηνίας του πεδίου "DateofSale".

Επιλέξτε DateAdd ("εεεε",-1, [DateofSale]) ως Έκφρ1 από το ProductSales.

Επιστρέφει τα αποτελέσματα αφαιρώντας το 1 έτος στις τιμές ημερομηνίας του πεδίου "DateofSale".

Επιλέξτε DateAdd ("d", 10, [DateofSale]) ως NewDate από το ProductSales.

Επιστρέφει τα αποτελέσματα στη στήλη "NewDate" προσθέτοντας 10 ημέρες στις τιμές ημερομηνίας του πεδίου "DateofSale".

Επιλέξτε DateAdd ("WW",-1, [DateofSale]) ως NewDate από το ProductSales.

Επιστρέφει τα αποτελέσματα στη στήλη "NewDate", αφαιρώντας 1 εβδομάδα (7 ημέρες) από τις τιμές ημερομηνίας του πεδίου "DateofSale".

Παράδειγμα VBA

Σημείωση: Παραδείγματα που ακολουθούν δείχνουν τη χρήση αυτής της συνάρτησης σε μια λειτουργική μονάδα της Visual Basic for Applications (VBA). Για περισσότερες πληροφορίες σχετικά με την εργασία με τη VBA, επιλέξτε αναφορά προγραμματιστή στην αναπτυσσόμενη λίστα δίπλα στην επιλογή Αναζήτηση και εισαγάγετε έναν ή περισσότερους όρους στο πλαίσιο αναζήτησης.

Αυτό το παράδειγμα λαμβάνει μια ημερομηνία ως εισαγωγή και χρησιμοποιεί τη συνάρτηση DateAdd για να εμφανίσει μια αντίστοιχη ημερομηνία για έναν συγκεκριμένο αριθμό μηνών στο μέλλον.

Dim FirstDate As Date    ' Declare variables.
Dim IntervalType As String
Dim Number As Integer
Dim Msg
IntervalType = "m" ' "m" specifies months as interval.
FirstDate = InputBox("Enter a date")
Number = InputBox("Enter number of months to add")
Msg = "New date: " & _
DateAdd(IntervalType, Number, FirstDate)
MsgBox Msg

Σημείωση:  Αυτή η σελίδα έχει μεταφραστεί μέσω αυτοματοποιημένης διαδικασίας και ενδεχομένως να περιέχει γραμματικά λάθη και ανακρίβειες. Ο σκοπός μας είναι αυτό το περιεχόμενο να σας φανεί χρήσιμο. Μπορείτε να μας πείτε εάν σας βοήθησαν αυτές οι πληροφορίες; Εδώ θα βρείτε το άρθρο στα Αγγλικά για να το συμβουλεύεστε.

Δείτε επίσης

Επιλέξτε τη συνάρτηση Right Date

Αναπτύξτε τις δεξιότητές σας στο Office
Εξερευνήστε το περιεχόμενο της εκπαίδευσης
Αποκτήστε πρώτοι τις νέες δυνατότητες
Γίνετε μέλος του Office Insider

Σας βοήθησαν αυτές οι πληροφορίες;

Σας ευχαριστούμε για τα σχόλιά σας!

Σας ευχαριστούμε για τα σχόλιά σας! Φαίνεται ότι μπορεί να είναι χρήσιμο να συνδεθείτε με έναν από τους συνεργάτες υποστήριξης του Office.

×