Θέμα: VBA SumWork2 & FillColor

Εμφάνιση ενός μόνο μηνύματος
  #5  
Παλιά 11-10-18, 18:37
kapetang Ο χρήστης kapetang δεν είναι συνδεδεμένος
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.674
Προεπιλογή

Καλησπέρα

Στέλιο, ο κώδικας για να καταμετρήσει σε μία γραμμή τα συνεχόμενα "ΠΑΡΩΝ" κλπ, πρέπει το αντίστοιχο κελί στη στήλη G (ειδικότητα) να μη είναι κενό.

Πιο συγκεκριμένα αρχίζει από το κελί G7, αν δεν είναι κενό, μετράει τα παρών στη γραμμή και προχωράει στην εξέταση του G8.

Αυτό συνεχίζεται μέχρι να βρεθεί κενό κελί στη στήλη G.

Αν βρεθεί θεωρεί ότι από τη γραμμή αυτή και κάτω δεν υπάρχουν δεδομένα οπότε σταματάει.

Βάλε συνεπώς δεδομένα στη στήλη G (ειδικότητα), έστω και εικονικά, και μετά τρέξε τη μακροεντολή.

Σημείωση:

Όταν καταχωρούμε δεδομένα στα κελιά φροντίζουμε οι καταχωρήσεις να είναι σύντομες.

Αυτό περιορίζει τις διαστάσεις της περιοχής των δεδομένων οπότε μπορούμε να τα βλέπουμε χωρίς πολλά «σκρολαρίσματα».

Επίσης περιορίζει τα λάθη. Για παράδειγμα αν πληκτρολογήσουμε τη φράση «ΣΥΝΕΧΙΣΗ ΑΡΙΘΜΗΣΗΣ ΤΗΝ ΕΠΟΜΕΝΗ» και παρεμβάλουμε περισσότερα από 1 διαστήματα στις λέξεις θα έχουμε λάθη στη βαφή των κελιών.

Για μένα θα μπορούσες αντί για «ΠΑΡΩΝ» να πληκτρολογείς «Π» και αντί για «ΣΥΝΕΧΙΣΗ ΑΡΙΘΜΗΣΗΣ ΤΗΝ ΕΠΟΜΕΝΗ» «Σ» και με κάποιο υπόμνημα να εξηγείς τι σημαίνουν.
Απάντηση με παράθεση