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/3581-synthiki-epilogis-dedomenon-metaksi-dio-imerominion.html)

Συνθήκη επιλογής δεδομένων μεταξύ δύο ημερομηνιών

Καλημέρα, έχω τα εξής δεδομένα:
Σε report έχω έσοδα και ημερομηνίες αυτών και έξοδα και ημερομηνίες.
Με την εξής συνθήκη ,

Private Sub elegxos_Click()
Dim SDate As Variant
Dim EDate As Variant
SDate = InputBox("Δώστε αρχική ημερομηνία", "ηη/μμ/εεεε")
EDate = InputBox("Δώστε τελική ημερομηνία", "ηη/μμ/εεεε")

If Not IsDate(SDate) Or Not IsDate(EDate) Then
MsgBox ("Απαιτούνται και οι δύο ημερομηνίες!"), vbInformation, "Έλεγχος"
Exit Sub
End If

Dim sinthiki
sinthiki = "[Ημερομηνία Εξ] Between #" & Format(SDate, "mm\/dd\/yyyy") & "#" & _
" and #" & Format(EDate, "mm\/dd\/yyyy") & "#"

DoCmd.OpenReport "rptExoda", acViewReport, , sinthiki

παίρνω δεδομένα μόνο από τα έξοδα την οριζόμενη ημερομηνία.
Πως μπορώ να συνδέσω τις συνθήκες ώστε να παίρνω δεδομένα και από τα έσοδα ([Ημερομηνία Εσ]);

Καλησπέρα

Σάκη, θα συμβούλευα να ανεβάσεις ένα δείγμα της ΒΔ και να διευκρινίσεις αναλυτικότερα το ζητούμενο.

Φιλικά/Γιώργος

Καλημέρα Γιώργο, σου επισυνάπτω ένα δείγμα της ΒΔ.
Αν κλικάρεις στα button ΦΠΑ και ΚΕΡΔΗ και βάζοντας ημερολογιακά διαστήματα π.χ. Φεβρουαρίου θα δεις ότι εμφανίζει μόνο εγγραφές ΕΣΟΔΩΝ διότι δεν μπορώ στον κώδικα να ορίσω συνθήκη που να συμπεριλαμβάνει και την Ημερομηνία Εξόδων(πεδίο [Ημερομηνία Εξ]).

Καλημέρα

Σάκη, αν κατάλαβα το ζητούμενο, η συνθήκη θα πρέπει να διαμορφωθεί ως εξής:

Κώδικας:

 sinthiki = "[Ημερομηνία Εσ] Between #" & Format(SDate, "mm\/dd\/yyyy") & "#" & _

             " and  #" & Format(EDate, "mm\/dd\/yyyy") & "# OR " & _

               "[Ημερομηνία Εξ] Between #" & Format(SDate, "mm\/dd\/yyyy") & "#" & _

             " and  #" & Format(EDate, "mm\/dd\/yyyy") & "# "

Η παραπάνω συνθήκη μπορεί επίσης να διαμορφωθεί και συντομότερα:

Κώδικας:

     sinthiki = "[Ημερομηνία Εσ] Between #" & Format(SDate, "mm\/dd\/yyyy") & "#" & _

             " and  #" & Format(EDate, "mm\/dd\/yyyy") & "#"

    sinthiki = sinthiki & " OR " & Replace(sinthiki, "Εσ]", "Εξ]")

Με την παραπάνω συνθήκη εμφανίζονται οι εγγραφές στις οποίες οι ημερομηνίες εξόδων ή εσόδων βρίσκονται στο διάστημα που επιλέγουμε

Φιλικά/Γιώργος

Γιώργο για άλλη μια φορά σε ευχαριστώ.Εγώ προσπάθησα να φτιάξω την πρώτη συνθήκη αλλά σε αυτό το σημείο σύνδεσης "OR " & _ " έκανα λάθος και δεν δούλευε.
Δουλεύει μία χαρά.