Forum - Μορφοποίηση VBA - Αυτόματη μορφοποίηση στο Excel

Forum (https://www.ms-office.gr/forum/)

- Excel - Ερωτήσεις / Απαντήσεις (https://www.ms-office.gr/forum/excel-erotiseis-apantiseis/)

- - [Μορφοποίηση] VBA - Αυτόματη μορφοποίηση στο Excel (https://www.ms-office.gr/forum/excel-erotiseis-apantiseis/3601-visual-basic-applications-aytomati-morfopoiisi-sto-excel.html)

VBA - Αυτόματη μορφοποίηση στο Excel

Όταν «τρέχω» κάποιες makro, τότε συχνά στο αποτέλεσμα παρατηρώ ότι οι μορφοποιήσεις του φύλλου που επέδρασε σε αρκετές περιπτώσεις τροποποιούνται δραματικά, ειδικά δε «ύψος γραμμής» και «πλάτος στήλης» που είναι και τα κυρίαρχα.
Έτσι «δυσκολεύουν» τον αναγνώστη να διαβάσει τα στοιχεία της επεξεργασίας και πρέπει να γίνει εκ νέου μορφοποίηση, πράγμα που είναι αρκετά χρονοβόρο ειδικά αν το πλήθος γραμμών – στηλών είναι μεγάλο.

Υπάρχει κάποιος κώδικας VBA που να αναλαμβάνει να καθορίσει αυτά τα δύο κυρίαρχα παραπάνω στοιχεία - τουλάχιστον - σε δοσμένα μεγέθη;
ΔΗΛΑΔΗ
Σε ένα φύλλο να δηλώσουμε - δεσμεύσουμε ότι π.χ. θέλουμε:
ύψος γραμμής =15 ή πλάτος στήλης=5 ή και τα δύο..!!
Σας ευχαριστώ πολυ

Τις 4 γραμμές κώδικα που ακολουθούν,
με τις 2 πρώτες, να δηλώνουν, συγκεκριμένη τιμή και
τις 2 επόμενες αυτόματη προσαρμογή...

Κώδικας:

    Columns("A:A").ColumnWidth = 14.38

    Rows("1:1").RowHeight = 30.75
 

    Columns("a:a").EntireColumn.AutoFit

    Rows("1:1").EntireRow.AutoFit

μπορείτε μια - μια χωριστά ή σε συνδυασμό να τις χρησιμοποιήσετε για να έχετε αποτέλεσμα.