Αλλαγή πλάτους στηλών σε φόρμα προβολής φύλλου δεδομένων

[dimitrisp]

Καλησπέρα

Γιώργο, στο παράδειγμα που ανέβασες είδα ότι ο κώδικας ισχύει μόνο για συγκεκριμένο φύλλο δεδομένων(frmMain).
Αν προσθέσουμε νέα φύλλα δεδομένων θα πρέπει να ενσωματώσουμε και σε αυτά τον ίδιο κώδικα κοκ.,
για να έχουμε το επιθυμητό αποτέλεσμα.

Προσπάθησα με μια Public να το γενικεύσω, αλλά μου χτυπάει στο "For Each ctrl In Me.Controls".

Έχεις καμιά ιδέα πώς μπορούμε να το χειριστούμε πιο γενικευμένα με καμιά Function?