[VBA] Merge Cells

[Spirosgr]

Αναφέρεις ...
«Τι κερδίζουμε, πέρα απ' την κομψότητα του κώδικα, μ' αυτόν τον τρόπο; διότι ο κώδικας τρέχει και χωρίς αυτό!»

Μην πανικοβάλλεσαι, όλα καλά ...
Συζητάμε τα πάντα, αλλά, σε ... «επιτρεπτό βάθος» κατά την κρίση μου...
κάποιος άλλος, μπορεί να απαντήσει...σε ότι θέλει...

[Χρήστος]

Όλα καλά...κανένα πρόβλημα...έχω ήδη αντιληφθεί πλεονεκτήματα του τρόπου που το έγραψες εσύ...

[kapetang]

Καλησπέρα στην παρέα

Στο χώρο των προγραμματιστών, κομψός θεωρείται ο λιτός κώδικας.

Και οι δύο γραμμές κώδικα:

SelectedRng.Parent.Range(c.Cells(i, 1), c.Cells(k - 1, 1)).Merge

Range(c.Cells(i, 1), c.Cells(k - 1, 1)).Merge

Είναι σωστές.

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

Τα κελιά c.Cells(i, 1), c.Cells(k - 1, 1) ανήκουν σε συγκεκριμένο φύλλο (το φύλλο στο οποίο έγινε η επιλογή) και συνεπώς το πρόθεμα SelectedRng.Parent είναι περιττό.

Μάλιστα μπορεί να δημιουργήσει και το ερωτηματικό: Ταυτίζεται το φύλλο SelectedRng.Parent με το φύλλο των κελιών c.Cells(i, 1), c.Cells(k - 1, 1);

Φιλικά/Γιώργος

[Spirosgr]

Θα συμφωνήσω, ως προς το πρώτο κομμάτι της παρατήρησης σου, Γιώργο...
Αν και ο «λιτός» θα πρέπει να είναι και πλήρης...
Τώρα το δεύτερο κομμάτι, όπως λες κι εσύ είναι υποκειμενικό...
Το γιατί «γράφτηκε» έτσι, είναι άλλου παπά ευαγγέλιο...