Θέμα: VBA Κενά κελιά

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

Καλημέρα

1)
Δημήτρη ο κώδικας που έγραψες προωθεί τις μη κενές τιμές προς τα πάνω, αλλά δεν εξασφαλίζει ότι με ένα πέρασμα θα συγκεντρωθούν όλες στο πάνω μέρος.

Στον κώδικά σου πρόσθεσα έναν εξωτερικό βρόχο (for ) που επαναλαμβάνει τον κώδικα και εξασφαλίζει τη συγκέντρωση όλων των τιμών στο πάνω μέρος.

2)
Πρόσθεσα επίσης τη μακροεντολή DeleteBlanks, που κάνει αποτελεσματικότερα το ζητούμενο.

Η μακροεντολή δημιουργήθηκε με καταγραφή
Συνημμένα Αρχεία
Τύπος Αρχείου: xlsm ΧΩΡΙΣ ΚΕΝΑ2.xlsm (49,1 KB, 11 εμφανίσεις)
Απάντηση με παράθεση