Forum

Forum (https://www.ms-office.gr/forum/)
-   Access - Ερωτήσεις / Απαντήσεις (https://www.ms-office.gr/forum/access-erotiseis-apantiseis/)
-   -   [ Συναρτήσεις ] Σφάλμα #ΔΙΑΙΡ./0! στην Access (https://www.ms-office.gr/forum/access-erotiseis-apantiseis/4891-sfalma-diair-0-stin-access.html)

dimitrisp 28-04-18 01:40

Σφάλμα #ΔΙΑΙΡ./0! στην Access
 
Γεια σας


Στο excel έχουμε τον τύπο, για παράδειγμα, [=A2/A3] και όταν είναι Α3=0 ή κενό τότε
στο κελί επιστρέφεται το σφάλμα #ΔΙΑΙΡ./0!.

Για να αποφευχθεί το σφάλμα #ΔΙΑΙΡ./0! στο excel, χρησιμοποιείται η συνάρτηση
=IF(A3;A2/A3;0) για να επιστραφεί η τιμή 0 ή η συνάρτηση =IF(A3;A2/A3;"")
για να επιστραφεί μια κενή συμβολοσειρά. Επίσης μπορεί να χρησιμοποιηθεί και η
συνάρτηση IFERROR κλπ.

Υπάρχει κάποιος αντίστοιχος τρόπος εξάλειψης του σφάλματος #ΔΙΑΙΡ./0!, όταν αυτό
εμφανίζεται στην Access?


Για παράδειγμα, σε ενα ερώτημα έχω την έκφραση:
MOLog: ([Diafora])/(Day(DateSerial(Year(Date());Month(Date())+1;0)))-(Day(Date()))

Όταν μηδενίζεται ο παρονομαστής εμφανίζεται το σφάλμα #ΔΙΑΙΡ./0!.



Σας ευχαριστώ εκ των προτέρων.

Morpheas 28-04-18 12:08

.../(Day(DateSerial(Year(Date());Month(Date())+1;0)))-(Day(Date()))

Δήλωσε μια μεταβλητή:
dim Dresult as variant

Εφόσον το αποτέλεσμα της παραπάνω διαίρεσης για κάποιο λόγο είναι κενό τότε η συνάρτηση που μετατρέπει το κενό σε κάτι άλλο είναι η Nz.
δώσε στη μεταβλητή την τιμή:

Dresult =Nz(([Diafora])/(Day(DateSerial(Year(Date());Month(Date())+1;0)))-(Day(Date())); {Εδώ βάλε το 0 ή ότι άλλο θέλεις να αντικαθιστά το κενό})

dimitrisp 28-04-18 18:13

1 Συνημμένο(α)
Καλησπέρα

Γιώργο σ`ευχαριστώ για τη βοήθειά σου.

Όμως, δεν μπορώ να κάνω ανάλογη προσαρμογή σε ένα ερώτημα που έχω.
Κάπου κάνω λάθος!

Για τούτο, ανέβασα το συνημμένο, όπου εμπεριέχεται ένα ερώτημα (qryA).

Αν έχεις το χρόνο, δες το...

kapetang 29-04-18 11:37

Καλημέρα

Δημήτρη, για το ερώτημα, θα πρότεινα τον τύπο:

Dresult: IIf(Nz([p1]-[p2];0)=0;0;Nz([P];0)/([P1]-[P2]))

dimitrisp 29-04-18 11:47

Καλημέρα

Θαυμάσια!!!

Γιώργο σε υπερευχαριστώ. Ο τύπος λειτουργεί άψογα.

Καλή συνέχεια...


Η ώρα είναι 04:14.

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


Search Engine Optimization by vBSEO 3.3.2