Σε αυτό το σεμινάριο, θα μάθετε πώς μπορείτε να ενεργοποιήσετε ή να απενεργοποιήσετε το Wrap Text στο Excel χρησιμοποιώντας VBA.
Αναδίπλωση κειμένου χρησιμοποιώντας VBA
Μπορείτε να τυλίξετε το κείμενο σε ένα κελί ή μια περιοχή, ορίζοντας την ιδιότητα εύρους. WrapText του αντικειμένου εύρους σε True. Ο ακόλουθος κώδικας θα τυλίξει το κείμενο στο κελί A1:
1 | Φύλλα εργασίας ("Sheet1"). Εύρος ("A1"). WrapText = True |
Το αποτέλεσμα είναι:
Μπορείτε επίσης να τυλίξετε ένα μεγαλύτερο εύρος κελιών:
1 | Εύρος ("A1: A10"). WrapText = True |
Απενεργοποίηση περιτύλιξης σε κελί χρησιμοποιώντας VBA
Μπορείτε να απενεργοποιήσετε την αναδίπλωση κειμένου σε ένα συγκεκριμένο κελί ή περιοχή χρησιμοποιώντας VBA. Ο ακόλουθος κώδικας θα απενεργοποιήσει την αναδίπλωση κειμένου στο κελί Β2:
1 | Εύρος ("B2"). WrapText = Λάθος |
Απενεργοποίηση περιτύλιξης σε ολόκληρο το φύλλο εργασίας
Μπορείτε να απενεργοποιήσετε την αναδίπλωση κειμένου σε όλα τα κελιά σε ένα φύλλο εργασίας χρησιμοποιώντας VBA. Ο ακόλουθος κώδικας θα σας επιτρέψει να απενεργοποιήσετε την αναδίπλωση κειμένου σε όλα τα κελιά του ActiveSheet:
12345 | Sub DisableWrapText ()Cells.WrapText = ΛάθοςΤέλος υπο |