ms-office.gr > Forum > Microsoft Excel > Excel - Ερωτήσεις / Απαντήσεις > [Excel07] Εντοπιστός συνεχών παρατηρήσεων στο excel

Excel - Ερωτήσεις / Απαντήσεις Ότι έχει σχέση με συναρτήσεις, μορφοποίηση, εκτυπώσεις γραφήματα κτλ.

Απάντηση στο θέμα

 

Εργαλεία Θεμάτων Τρόποι εμφάνισης
  #1  
Παλιά 26-09-14, 13:39
Όνομα: Αλέξης
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 24-09-2014
Μηνύματα: 4
Προεπιλογή Εντοπιστός συνεχών παρατηρήσεων στο excel

Καλημέρα και από μένα! Έχω πελαγώσει και ζητάω τη βοήθεια σας! Έχω ένα σύνολο δεδομένων στο excel από παρατηρήσεις της μορφής 0 ή 1.Χρειάζομαι να μπορώ να ελέγξω κάθε μία στήλη από τα δεδομένα και να βρω ποιος είναι ο μέγιστος αριθμός συνεχόμενων μηδενικών που εμφανίζεται. Όμως μιλάμε για πολλές στήλες και κάθε μία θα έχει περίπου στις 5-6 χιλιάδες γραμμές. Υπάρχει κάποιος να με συμβουλεύσει πως μπορώ να το κάνω αυτό;
Έχω επισυνάψει ένα αρχείο με ένα μικρό μέρος από τα δεδομένα. Το ερώτημα είναι πως μπορώ να βρω το μέγιστο αριθμό συνεχόμενων μηδενικών σε κάθε στήλη; Γίνεται αυτό στο excel;
Παρακαλώ όποιος μπορεί ας βοηθήσει. Δε ξέρω τι άλλο να κάνω!

Ευχαριστώ πολύ εκ των προτέρων!!
Συνημμένα Αρχεία
Τύπος Αρχείου: xlsx dedomena.xlsx (44,9 KB, 11 εμφανίσεις)
Απάντηση με παράθεση
  #2  
Παλιά 26-09-14, 20:23
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.737
Προεπιλογή

Καλησπέρα

Αλέξη καλωσόρισες στο φόρουμ.

Στο αρχείο που επισυνάπτω υπάρχει μια λύση με κώδικα.

Δοκίμασέ την και ενημέρωσε το φόρουμ, αν σε καλύπτει.

Φιλικά/Γιώργος
Συνημμένα Αρχεία
Τύπος Αρχείου: xlsm FindMaxZerosAndOnes.xlsm (58,3 KB, 27 εμφανίσεις)
Απάντηση με παράθεση
  #3  
Παλιά 26-09-14, 20:32
Όνομα: Αλέξης
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 24-09-2014
Μηνύματα: 4
Προεπιλογή

Καλησπέρα Γιώργο

Φίλε είσαι υπέροχος! Αυτό ακριβώς ψάχνω. Το θέμα είναι πως θα προσαρμόσω αυτόν τον κώδικα στα δεδομένα μου; Δε βρίσκω κάποια συνάρτηση στα κελιά να κάνω αντιγραφή επικόλληση. Μπορείς να μου δώσεις τα φώτα σου σε παρακαλώ πολύ; Ειλικρινά σ' ευχαριστώ! Είχα πελαγώσει να ψάχνω πως μπορεί να γίνει αυτό στο excel. Δεν ήξερα καν αν γίνεται βλέπεις..
Απάντηση με παράθεση
  #4  
Παλιά 26-09-14, 20:53
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.737
Προεπιλογή

Αλέξη όπως γράφω οι υπολογισμοί γίνονται με κώδικα VBA.

Όπως βλέπω δεν έχεις εμπειρία στον κώδικα.

Η καλύτερη λύση είναι να αντιγράψεις τα δεδομένα από το βιβλίο σου και να τα επικολλήσεις στο κελί «Β7» του βιβλίου που ανέβασα.

Τα υπόλοιπα θα γίνονται με το πάτημα του κουμπιού
Απάντηση με παράθεση
  #5  
Παλιά 26-09-14, 21:07
Το avatar του χρήστη Spirosgr
Συντονιστής
Όνομα: Σπύρος Τσιλιγιάννης
Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2007, Ms-Office 2010, Ms-Office 2013, Ms-Office 2016, Ms-Office 365
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 22-11-2011
Περιοχή: Αθήνα
Μηνύματα: 2.402
Προεπιλογή

Καλησπέρα
Ο πιο κάτω τύπος είναι τύπος πίνακα (εισάγεται με Ctrl+Shift+Enter)
Βάλτε τον τύπο στο A1 και τραβήξτε δεξιά όσο χρειάζεται.
Αλλάξτε το μήκος στήλης A2:A1000 όσο θέλετε.

=MAX(FREQUENCY(IF(A2:A1000=0;ROW(A2:A1000));IF(A2: A1000<>0;ROW(A2:A1000))))

ΣΗΜΕΙΩΣΗ:
Ο τύπος αυτός δεν αγνοεί «κενά».
Θα πρέπει να μην υπάρχουν κενά στα δεδομένα για να μην υπάρξει σφάλμα.
Απάντηση με παράθεση
  #6  
Παλιά 26-09-14, 21:57
Όνομα: Αλέξης
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 24-09-2014
Μηνύματα: 4
Προεπιλογή

Γιώργο Σπύρο σας ευχαριστώ πάρα πολύ για τη βοήθεια. Μου λύσατε τα χέρια. Γιώργο είμαι άσχετος σε σχέση με τον κώδικα που μου έστειλες. Από σένα τον άκουσα πρώτη φορά άρα δε ρωτάω παραπάνω. Απλά έχω τόσες πολλές στήλες που δεν εξυπηρετεί να τις τοποθετώ μία μία. Σ΄ευχαριστώ και πάλι.

Σπύρο αυτή η εντολή στο excel με εξυπηρετεί πλήρως. Ωστόσο θα σε ρωτήσω αν μπορείς να μου εξηγήσεις. Την έφτιαξες εσύ; Τι σημαίνει εντολή πίνακα; Δεν έχω ξαναδεί να εισάγεται εντολή με αυτόν τον τρόπο για να λειτουργήσει. Αν κάποια στίγμή βρεις λίγο χρόνο και έχεις διάθεση, θα ήθελα να μάθω που θα μπορούσα να ψάξω να μάθω να την φτιάχνω κι εγώ μελλοντικά. Έψαξα τις συναρτήσεις στο excel αλλά δε μπορούσα να βγάλω άκρη.
Σ' ευχαριστώ πολύ και σένα!
Απάντηση με παράθεση
  #7  
Παλιά 26-09-14, 22:09
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.737
Προεπιλογή

Αλέξη δεν κατάλαβες. Δε θα αντιγράφεις μία μία της στήλες.
Θα επιλέξεις όλα τα δεδομένα σου, θα τα αντιγράψεις (Copy) και θα τα επικολλήσεις (Paste) στο κελί "Β7" του φύλλου που ανέβασα.
Απάντηση με παράθεση
  #8  
Παλιά 26-09-14, 23:23
Όνομα: Αλέξης
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 24-09-2014
Μηνύματα: 4
Προεπιλογή

Γιώργο τώρα κατάλαβα τι εννοούσες. Το έκανα. Μια χαρά λειτούργησε. Πολύ εύκολο και γρήγορο. Έχεις απόλυτο δίκιο. Λειτουργεί άψογα. Πολύ σε ευχαριστώ και πάλι!

Υ.Γ.Αυτό το έφτιαξες στηριζόμενος σε γλώσσα προγραμματισμού ή καμία σχέση;
Απάντηση με παράθεση
  #9  
Παλιά 27-09-14, 10:01
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.737
Προεπιλογή

Στηρίζεται στη γλώσσα προγραμματισμού "visual basic for application" (σύντομα VBA), η οποία είναι ενσωματωμένη σε όλες τις εφαρμογές του Office (Excel, Access, κλπ).
Απάντηση με παράθεση
  #10  
Παλιά 27-09-14, 11:05
Το avatar του χρήστη Spirosgr
Συντονιστής
Όνομα: Σπύρος Τσιλιγιάννης
Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2007, Ms-Office 2010, Ms-Office 2013, Ms-Office 2016, Ms-Office 365
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 22-11-2011
Περιοχή: Αθήνα
Μηνύματα: 2.402
Προεπιλογή

Καλημέρα
Για όσους θέλουν κάτι παραπάνω...
Ο πιο κάτω τύπος είναι τύπος πίνακα (εισάγεται με Ctrl+Shift+Enter)

=MAX(FREQUENCY(IF(((A2:A20)="Search")*(A2:A20<>"");ROW(A2:A20));IF(NOT((A2:A20="Search")*(A2:A20<>""));ROW(A2:A20))))

Αντικαταστήστε την έκφραση "Search" με οποιοδήποτε αριθμό, οποιοδήποτε κείμενο μέσα σε εισαγωγικά,
οποιαδήποτε ημερομηνία σε μορφή «Γενική» πχ 27/9/2014 = 41909
Προσαρμόστε την περιοχή αναζήτησης πχ A2:A20 σε G100:G5000

Ο τύπος αποδίδει την καταμέτρηση διαδοχικών εμφανίσεων του ζητούμενου αγνοώντας τα «κενά»
ΣΗΜΕΙΩΣΗ: 1
Κενό = "" (άδειο κελί) και όχι " " (κελί με space)
ΣΗΜΕΙΩΣΗ: 2
Οι ημερομηνία στην περιοχή ελέγχου (A2:A20) μπορεί να είναι σε format Date
Μόνο στον τύπο format General
Απάντηση με παράθεση
Απάντηση στο θέμα

Εργαλεία Θεμάτων
Τρόποι εμφάνισης

Δικαιώματα - Επιλογές
Δε μπορείτε να δημοσιεύσετε νέα μηνύματα
Δε μπορείτε να δημοσιεύσετε απαντήσεις
Δεν μπορείτε να επισυνάψετε αρχεία
Δεν μπορείτε να επεξεργαστείτε τα μηνύματα σας

Ο κώδικας ΒΒ είναι σε λειτουργία
Τα Smilies είναι σε λειτουργία
Ο κώδικας [IMG] είναι σε λειτουργία
Ο κώδικας HTML είναι εκτός λειτουργίας
Trackbacks are εκτός λειτουργίας
Pingbacks are εκτός λειτουργίας
Refbacks are εκτός λειτουργίας



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