Forum

Forum (https://www.ms-office.gr/forum/)
-   Access - Ερωτήσεις / Απαντήσεις (https://www.ms-office.gr/forum/access-erotiseis-apantiseis/)
-   -   Τελευταια ημερομηνία κάθε τρέχον έτους (https://www.ms-office.gr/forum/access-erotiseis-apantiseis/6251-teleytaia-imerominia-kathe-trexon-etoys.html)

γιώργοςΚ 07-02-23 15:03

Τελευταια ημερομηνία κάθε τρέχον έτους
 
Καλησπέρα,

Προσπαθώ να βρώ με ποιο τρόπο μπορώ να υπολογίζω αυτόματα την τελευταία ημερομηνία κάθε τρέχον έτους. Δηλαδή, εάν βρισκόμαστε στο 2023 θα πρεπει να μπορώ να βρίσκω το αποτέλεσμα 31/12/2023 ή εάν ειμαστε στο 2024 το αποτέλεσμα 31/12/2024 (συμπίπτει το ιδιο αποτέλεσμα)

Καμιά ιδέα?

γιώργοςΚ 07-02-23 16:31

Παράθεση:

Αρχική Δημοσίευση από γιώργοςΚ (Μήνυμα 34427)
Καλησπέρα,

Προσπαθώ να βρώ με ποιο τρόπο μπορώ να υπολογίζω αυτόματα την τελευταία ημερομηνία κάθε τρέχον έτους. Δηλαδή, εάν βρισκόμαστε στο 2023 θα πρεπει να μπορώ να βρίσκω το αποτέλεσμα 31/12/2023 ή εάν ειμαστε στο 2024 το αποτέλεσμα 31/12/2024 (συμπίπτει το ιδιο αποτέλεσμα)

Καμιά ιδέα?

Φιλοι μου ελυσα το προβλημα με το πιο κατω

Dim dt As Date
dt = CDate("31/12/" & DatePart("yyyy", Now()))

Σε καθε περίπτωση ευχαριστω


Η ώρα είναι 11:11.

Ms-Office.gr - ©2000 - 2026, Jelsoft Enterprises Ltd.


Search Engine Optimization by vBSEO 3.3.2