| Excel - Ερωτήσεις / Απαντήσεις Ότι έχει σχέση με συναρτήσεις, μορφοποίηση, εκτυπώσεις γραφήματα κτλ. |
![]() |
| | Εργαλεία Θεμάτων | Τρόποι εμφάνισης |
|
#1
| |||
| |||
|
Δεν διαγράφονται κάποιες γραμμές όταν υπάρχουν κενά κελιά.
|
|
#2
| |||
| |||
|
Καλησπέρα Δημήτρη, για να δεις τι συμβαίνει, αρίθμησε τις γραμμές στη στήλη I από 1 έως 30. Εφαρμόζοντας ακολούθως τον κώδικα θα δεις ότι δεν διαγράφονται οι γραμμές 21, 23, 25, 27, και 29. Γιατί; Όταν διαγράφεται μία γραμμή οι από κάτω γραμμές μετακινούνται μία γραμμή προς τα πάνω Όταν διαγράφεται η 20 οι από κάτω γραμμές μετακινούνται προς τα πάνω και συνεπώς η 21 γίνεται 20, 22 γίνεται 21 και τελικά η 30 γίνεται 29. Όταν ο κώδικας διαγράφει μια άλλη γραμμή έχουμε πάλι μετακίνηση και νέα αρίθμηση. Αποτέλεσμα: Κάθε γραμμή που παίρνει τη θέση της διαγραμμένης, δεν εξετάζεται από τον κώδικα και δεν διαγράφεται. Για να αντιμετωπιστεί το πρόβλημα, ο κώδικας θα πρέπει να διαγράφει τις γραμμές, από κάτω προς τα πάνω. Αυτό κάνει ο παρακάτω κώδικας: Κώδικας: Sub DeleteRowIfCellBlank1()
Dim Cell As Range, i As Long
For i = Range("A1:A30").Rows.Count To 1 Step -1
Set Cell = Range("a1:a30")(i)
If Cell.Value = "" Then Cell.EntireRow.Delete
Next
End Sub
|
|
#3
| |||
| |||
|
Καλημέρα Γίώργο! Ο κώδικας αναφέρετε στην στήλη Α αλλά από απροσεξία μου παρουσίασα το πρόβλημα στην στήλη Β. Τώρα μόλις πήγα να διορθώσω το αρχείο που έστειλα αλλά είδα ότι κατάλαβες το λάθος μου. Σε ευχαριστώ πάρα πολύ για την αναλυτική σου εξήγηση! Τελευταία επεξεργασία από το χρήστη ΔΗΜΗΤΡΙΟΣ : 08-03-21 στις 07:43. |
|
#4
| |||
| |||
|
Να είσαι καλά και καλή συνέχεια.
|
![]() |
« Προηγούμενο Θέμα
|
Επόμενο Θέμα »
| |
| ||||
| Θέμα | Δημιουργός | Forum | Απαντήσεις | Τελευταίο Μήνυμα |
| [Συναρτήσεις] Αρίθμηση γραμμών | christ | Excel - Ερωτήσεις / Απαντήσεις | 4 | 06-12-20 17:09 |
| [Γενικά] Διαγραφή κενών γραμμών | ΔΗΜΗΤΡΙΟΣ | Excel - Ερωτήσεις / Απαντήσεις | 2 | 29-10-19 19:18 |
| [Γενικά] Διαγραφή Κενών Γραμμών | Spirosgr | Excel - Tips & Tricks | 0 | 29-10-19 06:29 |
| [Γενικά] απόκρυψη γραμμών | rmaria | Excel - Ερωτήσεις / Απαντήσεις | 2 | 02-04-15 14:49 |
| [ Πρόσθετα ] Απόκρυψη Γραμμών | ΤΖΙΜΗΣ | Excel - Ερωτήσεις / Απαντήσεις | 10 | 22-01-12 12:38 |
Η ώρα είναι 17:50.


Αλλαγή σε γραμμικό τρόπο

