Forum

Forum (https://www.ms-office.gr/forum/)
-   Excel - Ερωτήσεις / Απαντήσεις (https://www.ms-office.gr/forum/excel-erotiseis-apantiseis/)
-   -   [Συναρτήσεις] sumifs (https://www.ms-office.gr/forum/excel-erotiseis-apantiseis/4047-sumifs.html)

akaliptex 09-02-16 12:38

sumifs
 
Καλημέρα, εχω ένα προβλημα με την συνάρτηση ,
θέλω να προσθέτει τα ποσά ανα μήνα
χρησιμοποιώ αυτην =SUMIFS(DATABASE!P3:P2000;DATABASE!A3:A2000;">=01/05/16";DATABASE!A3:A2000;"<=31/05/16")
αλλα όταν η ημερομήνια είναι πχ 11/05/16 δεν το υπολογίζει...
που είναι το λάθος..?

Ευχαριστώ

Spirosgr 09-02-16 13:42

Καλησπέρα
Κατ' αρχήν, δεν μας είπες, αν το ζητούμενό σου, στον κώδικα που ζήτησες
σε βοήθησε.
Τώρα:
Τα είπαμε ήδη, δύο φορές...
Για να μην επαναλαμβανόμαστε, ρύθμισε το office ή και τα Windows.
Το 11/05/16 το διαβάζει 5 Νοεμβ 2016, κατά το Αμερικάνικο σύστημα.

akaliptex 09-02-16 14:08

Ηι
 
Καλησπέρα Σπύρο, ναι ο κώδικας βοήθησε.
Το πρόβλημα όμως δεν είναι η κωδικοποίηση.
η ημερομηνια μπαίνει με userform στην στήλη κανω μορφοποίηση κελιών ημερομηνία μορφής 14/01/2016..
μετά έχω τον τυπο: =SUMIFS(DATABASE!P3:P2000;DATABASE!A3:A2000;">=1/5/2016";DATABASE!A3:A2000;"<=31/5/2016")
και δεν βγαίνει..
Ευχαριστώ

Spirosgr 09-02-16 14:21

Αν συνδυάσω το ερώτημα αυτό με το άλλο,
η μορφοποίηση πρέπει να γίνει και στον κώδικα, μέσα στην φόρμα.
Χωρίς να ξέρω το τι έχεις κάνει, με κάθε επιφύλαξη...
κάτι σαν
format(me.textbox1, "dd/mm/yyyy") ή ακόμα και

k.NumberFormat = "dd/mm/yyyy"
k.Value = Date

όπου k το τελευταίο κελί...

akaliptex 09-02-16 17:18

αα
 
Δεν το βγάζει και πάλι,, Θα βαλω συναρτηση month και year σε μια στηλη και μετα θα κάνω την sumifs...
Tτι λες??

Spirosgr 10-02-16 06:27

Δεν υπάρχει περίπτωση λάθους, σε αυτά που σου έχω πει.
Ανέβασε ένα αρχείο, να δούμε τι έχεις κάνει...

akaliptex 10-02-16 13:36

ΛΥΣΗ
 
Τελικά δούλεψε έτσι¨
Private Sub Textbox1_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean)
On Error Resume Next
Me.Textbox1 = CDate(Me.Textbox1)
End Sub

Ευχάριστώ Σπύρο

Spirosgr 10-02-16 17:09

1 Συνημμένο(α)
Η εικόνα, αποδεικνύει, ότι αν δεν κάνεις κάτι από αυτά που σου είπα
δεν υπάρχει σωστό αποτέλεσμα με τον κώδικα που εσύ λες ότι αποτελεί λύση.
Δεν είναι λύση.

Spirosgr 10-02-16 17:35

1 Συνημμένο(α)
Δεν θα ήθελα, να μπώ σε καμία αντιπαράθεση, με λύσεις από άλλα sites ή
γιατί δεν ανεβάζεις ένα αρχείο, να δούμε το πρόβλημα επί πραγματικού.

Για όσους ενδιαφέρονται, η πραγματική λύση είναι:
Κώδικας:

Private Sub CommandButton1_Click()
    Dim Lrow As Long
    Lrow = Sheet1.Cells(Rows.Count, 1).End(xlUp).Row + 1
    Sheet1.Cells(Lrow, 1).NumberFormat = "dd/mm/yyyy"
    Sheet1.Cells(Lrow, 1).Value = DateValue(Me.TextBox1.Text)
End Sub

Σημειώσεις:
Ο κώδικας απ'ευθείας στο κουμπί που εισάγει την τιμή (ημερομηνία) στο τελευταίο κενό κελί της Α στήλης
και όχι σε BeforeUpdate
Μορφοποίηση ημερομηνίας πχ 02/05/2015
Όπου Sheet1 το κωδικό όνομα του φύλλου.

akaliptex 12-02-16 17:57

Καλησπέρα
 
Δεν μπαίνω σε αντιπαράθεση,, απλα εγώ έψαχνα λύση για να γίνεται το άθροισμα με το sumifs..
αυτο που έγραψα όντως δουλεύει,απλά στην φόρμα η ημερομηνία είναι αμερ.μορφής στο κελί όμως την βγάζει μια χαρά. ο κώδικας που έγραψες μου έβγαζε error.. απλά εψαξα και βρήκα αυτον και δουλεύει..Δεν είμαι τέλειος στην vba ..απλά αυτό που ήθελα να κάνει το sumifs το κάνει..
φιλικά
Μανώλης

Spirosgr 12-02-16 19:27

Το να μπορεί να χρησιμοποιήσει κανείς, sumif ή όποια άλλη συνάρτηση και
να έχει σωστό αποτέλεσμα, έρχεται και είναι η δεύτερη φάση ...
Πρώτα πρέπει να έχει σωστές ημερομηνίες.

Σου ζήτησα, να ανεβάσεις ένα αρχείο και αντ' αυτού, παρουσίασες μια «λύση».
Πριν είχα γράψει κάποιες πιθανές γραμμές με επιφύλαξη (όπως γράφω)
χωρίς να ξέρω τίποτα, από αυτά που στην πραγματικότητα δημιουργείς...

Μου απάντησες ότι «παίρνεις» λάθος ... με την υπόδειξή μου !

Σου «δείχνω» με την εικόνα, ότι αυτό που γράφεις εσύ είναι λάθος.

Τώρα λες, ότι αυτό που υπέδειξα βγάζει error και αυτό που «βρήκες» είναι εντάξει τελικά
αλλά στην φόρμα η ημερομηνία να είναι σε Αμερικάνικη μορφή...

Θα πρέπει δηλ ο χρήστης να θυμάται ότι για να γράψει σε κελί 3/2/2016
θα πρέπει να βάλει στην φόρμα 2/3/2016 ...

Πραγματικά δεν καταλαβαίνω ... τι σκοπό εξυπηρετεί αυτή η συζήτηση ...

ΥΓ
Όποιοι μας διαβάζουν κι έχουν παρόμοιο πρόβλημα,
καλό είναι να χρησιμοποιήσουν τον κώδικα στο post #9


Η ώρα είναι 09:52.

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


Search Engine Optimization by vBSEO 3.3.2