Επιστρέφει μια Μεταβλητή (Ακέραιος) που περιέχει το καθορισμένο τμήμα μιας δεδομένης ημερομηνίας.
| Προειδοποίηση Υπάρχει πρόβλημα με τη χρήση αυτής της συνάρτησης. Η τελευταία Δευτέρα σε ορισμένα ημερολογιακά έτη μπορεί να επιστραφεί ως εβδομάδα 53, ενώ θα έπρεπε να είναι η εβδομάδα 1. Για περισσότερες πληροφορίες και μια λύση, ανατρέξτε στο θέμα Οι συναρτήσεις Format ή DatePart μπορεί να επιστρέψουν λάθος αριθμό εβδομάδας για την προηγούμενη Δευτέρα του έτους. |
|---|
Σύνταξη
DatePart(διάστημα; ημερομηνία [; πρώτη_ημέρα_εβδομάδας] [; πρώτη_εβδομάδα_έτους] )
Η σύνταξη της συνάρτησης DatePart περιλαμβάνει τα παρακάτω ορίσματα:
| Επιχείρημα | Περιγραφή |
|---|---|
| interval | Υποχρεωτικό. Παράσταση συμβολοσειράς που είναι το χρονικό διάστημα που θέλετε να επιστραφεί. |
| ημερομηνία | Υποχρεωτικό. Μεταβλητή (Ημερομηνία) που θέλετε να αξιολογήσετε. |
| πρώτη_ημέρα_εβδομάδας | Προαιρετικό. Μια σταθερά που καθορίζει την πρώτη ημέρα της εβδομάδας. Εάν δεν καθοριστεί, πρώτη ημέρα θεωρείται η Κυριακή. |
| πρώτη_εβδομάδα_έτους | Προαιρετικό. Μια σταθερά που καθορίζει την πρώτη εβδομάδα του έτους. Εάν δεν καθοριστεί, πρώτη εβδομάδα θεωρείται η εβδομάδα η οποία περιλαμβάνει την 1η Ιανουαρίου. |
Ρυθμίσεις
Το όρισμα διαστήματος έχει τις εξής ρυθμίσεις:
| Ρύθμιση | Περιγραφή |
|---|---|
| εεεε | Έτος |
| τ | Τρίμηνο |
| μ | Μήνας |
| y | Ημέρα του έτους |
| η | Ημέρα |
| β | Weekday |
| ββ | Εβδομάδα |
| ω | Ώρα |
| λ | Λεπτό |
| δ | Δευτερόλεπτο |
Το όρισμα firstdayofweek έχει τις εξής ρυθμίσεις:
| Σταθερός | Τιμή | Περιγραφή |
|---|---|---|
| vbUseSystem | 0 | Χρησιμοποιήστε τη ρύθμιση API NLS. |
| vbSunday | 1 | Κυριακή (προεπιλογή) |
| vbΔευτέρα | 2 | Δευτέρα |
| vbΤρίτη | 3 | Τρίτη |
| vbWednesday | 4 | Τετάρτη |
| vbΠέμπτη | 5 | Πέμπτη |
| vbΠαρασκευή | 6 | Παρασκευή |
| vbΣάββατο | 7 | Σάββατο |
Το όρισμα firstweekofyear έχει τις εξής ρυθμίσεις:
| Σταθερός | Τιμή | Περιγραφή |
|---|---|---|
| vbUseSystem | 0 | Χρησιμοποιήστε τη ρύθμιση API NLS. |
| vbFirstJan1 | 1 | Ξεκινήστε με την εβδομάδα στην οποία εμφανίζεται η 1η Ιανουαρίου (προεπιλογή). |
| vbFirstFourDays | 2 | Ξεκινήστε με την πρώτη εβδομάδα που έχει τουλάχιστον τέσσερις ημέρες στο νέο έτος. |
| vbFirstFullWeek | 3 | Ξεκινήστε με την πρώτη πλήρη εβδομάδα του έτους. |
Παρατηρήσεις
Μπορείτε να χρησιμοποιήσετε τη συνάρτηση DatePart για να υπολογίσετε μια ημερομηνία και να επιστρέψετε ένα συγκεκριμένο χρονικό διάστημα. Για παράδειγμα, μπορείτε να χρησιμοποιήσετε το DatePart για να υπολογίσετε την ημέρα της εβδομάδας ή την τρέχουσα ώρα.
Το όρισμα firstdayofweek επηρεάζει τους υπολογισμούς που χρησιμοποιούν τα σύμβολα διαστήματος "w" και "ww".
Εάν η ημερομηνία είναι λεκτική ημερομηνία, το καθορισμένο έτος γίνεται μόνιμο τμήμα αυτής της ημερομηνίας. Ωστόσο, εάν η ημερομηνία περικλείεται σε διπλά εισαγωγικά (" ") και παραλείψετε το έτος, το τρέχον έτος εισάγεται στον κώδικά σας κάθε φορά που υπολογίζεται η παράσταση ημερομηνίας . Αυτό καθιστά δυνατή τη σύνταξη κώδικα που μπορεί να χρησιμοποιηθεί σε διαφορετικά έτη.
Σημείωση
Για την ημερομηνία, εάν η ρύθμιση της ιδιότητας Calendar είναι Γρηγοριανή, η ημερομηνία που παρέχεται πρέπει να είναι Γρηγοριανή. Εάν το ημερολόγιο είναι Χίζρι, η ημερομηνία που παρέχεται πρέπει να είναι Χίζρι.
Το επιστρεφόμενο τμήμα της ημερομηνίας είναι στις χρονικές μονάδες του τρέχοντος αραβικού ημερολογίου. Για παράδειγμα,αν το τρέχον ημερολόγιο είναι Χίζρι και το τμήμα της ημερομηνίας που θα επιστραφεί είναι το έτος, η τιμή έτους είναι έτος Χίζρι.
Παραδείγματα ερωτήματος
| Έκφραση | Αποτελέσματα |
|---|---|
| SELECT DatePart("εεεε",[DateofSale]) AS NewDate FROM ProductSales; | Επιστρέφει το 'Έτος' των τιμών ημερομηνίας του πεδίου "DateofSale". |
| SELECT DatePart("τ",[Ημερομηνία_πώλησης]) AS NewDate FROM ProductSales; | Επιστρέφει το 'Τρίμηνο' (με βάση το ημερολογιακό έτος) των τιμών ημερομηνίας του πεδίου "DateOfSale". |
| SELECT DatePart("ε",[Ημερομηνία_πώλησης]) AS NewDate FROM ProductSales; | Επιστρέφει την 'Ημέρα του έτους' (1 έως 365) των τιμών ημερομηνίας του πεδίου "DateofSale". |
| SELECT DatePart("η";[DateofSale]) AS NewDate FROM ProductSales; | Επιστρέφει την 'Ημέρα' των τιμών ημερομηνίας του πεδίου "DateOfSale". |
| SELECT DatePart("ε";[Ημερομηνία_πώλησης]) AS NewDate FROM ProductSales; | Επιστρέφει την 'Εργάσιμη ημέρα' (από το 1 έως το 7, όπου το 1 αντιπροσωπεύει την Κυριακή) των τιμών ημερομηνίας του πεδίου "DateofSale". |
| SELECT DatePart("εε";[Ημερομηνία_πώλησης]) AS NewDate FROM ProductSales; | Επιστρέφει τον 'αριθμό εβδομάδας' (από το 1 έως το 52) των τιμών ημερομηνίας του πεδίου "DateofSale". |
| SELECT DatePart("h",[DateTime]) AS NewDate FROM ProductSales; | Επιστρέφει την 'Ώρα' των τιμών ημερομηνίας του πεδίου "DateTime". |
| SELECT DatePart("n",[DateTime]) AS NewDate FROM ProductSales; | Επιστρέφει τα 'Λεπτά' των τιμών ημερομηνίας του πεδίου "DateTime". |
| SELECT DatePart("s",[DateTime]) AS NewDate FROM ProductSales; | Επιστρέφει τα 'δευτερόλεπτα' των τιμών ημερομηνίας του πεδίου "DateTime". |
Παράδειγμα VBA
Σημείωση
Τα παραδείγματα που ακολουθούν δείχνουν τη χρήση αυτής της συνάρτησης σε μια λειτουργική μονάδα Visual Basic for Applications (VBA). Για περισσότερες πληροφορίες σχετικά με την εργασία με τη VBA, επιλέξτε " Αναφορά προγραμματιστών " στην αναπτυσσόμενη λίστα δίπλα στην επιλογή "Αναζήτηση " και εισαγάγετε έναν ή περισσότερους όρους στο πλαίσιο αναζήτησης.
Αυτό το παράδειγμα λαμβάνει μια ημερομηνία και, χρησιμοποιώντας τη συνάρτηση DatePart , εμφανίζει το τρίμηνο του έτους στο οποίο εμφανίζεται.
Dim TheDate As Date ' Declare variables.
Dim Msg
TheDate = InputBox("Enter a date:")
Msg = "Quarter: " & DatePart("q", TheDate)
MsgBox Msg