Note: The other languages of the website are Google-translated. Back to English

Πώς να αλλάξετε το μέγεθος του πλαισίου κειμένου ώστε να ταιριάζει με το περιεχόμενο στο Excel;

Το μέγεθος του πλαισίου κειμένου καθορίζεται μετά την εισαγωγή του σε ένα φύλλο εργασίας. Επομένως, το μέγεθος δεν θα προσαρμοστεί ώστε να ταιριάζει στο κείμενο που έχετε εισαγάγει ή διαγράψει. Αυτό το άρθρο στοχεύει να σας δείξει μεθόδους αυτόματης αλλαγής μεγέθους του πλαισίου κειμένου ώστε να ταιριάζει με το περιεχόμενο στο Excel.

Αυτόματη αλλαγή μεγέθους ενός πλαισίου κειμένου για προσαρμογή του περιεχομένου με αλλαγή μεγέθους σχήματος για προσαρμογή της δυνατότητας κειμένου
Αυτόματη αλλαγή μεγέθους όλων των πλαισίων κειμένου ώστε να ταιριάζει στο περιεχόμενο με τον κώδικα VBA


Αυτόματη αλλαγή μεγέθους ενός πλαισίου κειμένου για προσαρμογή του περιεχομένου με αλλαγή μεγέθους σχήματος για προσαρμογή της δυνατότητας κειμένου

Μπορείτε να αλλάξετε την ιδιότητα του πλαισίου κειμένου ως εξής για να την αλλάξετε αυτόματα με το κείμενο που εισαγάγατε ή διαγράψατε.

1. Μετά την εισαγωγή του πλαισίου κειμένου, κάντε δεξί κλικ στο περίγραμμα του πλαισίου κειμένου και, στη συνέχεια, κάντε κλικ στο Μέγεθος και ιδιότητες από το μενού με δεξί κλικ. Δείτε το στιγμιότυπο οθόνης:

2. Μπορείτε να δείτε ένα Μορφή σχήματος Το παράθυρο εμφανίζεται στη δεξιά πλευρά του φύλλου εργασίας, κάτω από το Μέγεθος και ιδιότητες καρτέλα, ελέγξτε το Αλλάξτε το μέγεθος για να προσαρμόσετε το κείμενο στο πλαίσιο κειμένου Box και μετά κλείστε το Μορφή σχήματος τζάμι. Δείτε το στιγμιότυπο οθόνης:

Από τώρα και στο εξής, το πλαίσιο κειμένου θα αλλάξει μέγεθος ώστε να ταιριάζει αυτόματα στο περιεχόμενο.

Note: Με αυτήν τη μέθοδο, εάν υπάρχουν πολλά πλαίσια κειμένου που πρέπει να αλλάξουν, πρέπει να αλλάξετε τις ιδιότητες των πλαισίων κειμένου μία προς μία.


Αυτόματη αλλαγή μεγέθους όλων των πλαισίων κειμένου ώστε να ταιριάζει στο περιεχόμενο με τον κώδικα VBA

Για ένα φύλλο εργασίας που έχει ήδη πολλά πλαίσια κειμένου, ο ακόλουθος κώδικας VBA μπορεί να σας βοηθήσει να αλλάξετε το μέγεθός τους αυτόματα ώστε να ταιριάζει στο περιεχόμενο ταυτόχρονα.

1. Τύπος άλλος + F11 ταυτόχρονα για να ανοίξετε το Microsoft Visual Basic για εφαρμογές παράθυρο.

2. Στο Microsoft Visual Basic για εφαρμογές παράθυρο, κάντε κλικ στην επιλογή Κύριο θέμα > Μονάδα μέτρησης. Στη συνέχεια, αντιγράψτε και επικολλήστε τον παρακάτω κώδικα VBA στο παράθυρο Module.

Κωδικός VBA: Αυτόματη αλλαγή μεγέθους όλων των πλαισίων κειμένου για προσαρμογή του περιεχομένου σε ένα φύλλο εργασίας

Sub TextBoxResizeTB()
    Dim xShape As Shape
    Dim xSht As Worksheet
    On Error Resume Next
    For Each xSht In ActiveWorkbook.Worksheets
        For Each xShape In xSht.Shapes
            If xShape.Type = 17 Then
                xShape.TextFrame2.AutoSize = msoAutoSizeShapeToFitText
                xShape.TextFrame2.WordWrap = True
            End If
        Next
    Next
End Sub

3. Πάτα το F5 κλειδί για την εκτέλεση του κώδικα. Στη συνέχεια, μπορείτε να δείτε ότι όλα τα πλαίσια κειμένου στο τρέχον φύλλο εργασίας αλλάζουν μέγεθος αυτόματα ώστε να ταιριάζουν στο περιεχόμενό του όπως φαίνεται στο παρακάτω στιγμιότυπο οθόνης.

Και αυτά τα πλαίσια κειμένου θα αλλάξουν μέγεθος αυτόματα με το περιεχόμενο που εισάγετε ή διαγράφετε σε μελλοντική χρήση.


Σχετικό άρθρο:


Τα καλύτερα εργαλεία παραγωγικότητας του Office

Το Kutools για Excel λύνει τα περισσότερα από τα προβλήματά σας και αυξάνει την παραγωγικότητά σας κατά 80%

  • Επαναχρησιμοποίηση: Εισαγάγετε γρήγορα σύνθετοι τύποι, γραφήματα και οτιδήποτε έχετε χρησιμοποιήσει στο παρελθόν. Κρυπτογράφηση κυττάρων με κωδικό πρόσβασης Δημιουργία λίστας αλληλογραφίας και στείλτε email ...
  • Super Formula Bar (επεξεργαστείτε εύκολα πολλές γραμμές κειμένου και τύπου). Διάταξη ανάγνωσης (εύκολη ανάγνωση και επεξεργασία μεγάλου αριθμού κελιών). Επικόλληση σε φιλτραρισμένο εύρος...
  • Συγχώνευση κελιών / σειρών / στηλών χωρίς απώλεια δεδομένων · Περιεχόμενο διαχωρισμού κελιών Συνδυάστε διπλές σειρές / στήλες... Αποτροπή διπλών κυττάρων; Συγκρίνετε τα εύρη...
  • Επιλέξτε Διπλότυπο ή Μοναδικό Σειρές; Επιλέξτε Κενές σειρές (όλα τα κελιά είναι κενά). Σούπερ εύρεση και ασαφής εύρεση σε πολλά βιβλία εργασίας. Τυχαία επιλογή ...
  • Ακριβές αντίγραφο Πολλαπλά κελιά χωρίς αλλαγή της αναφοράς τύπου. Αυτόματη δημιουργία αναφορών σε πολλαπλά φύλλα? Εισαγωγή κουκκίδων, Πλαίσια ελέγχου και άλλα ...
  • Εξαγωγή κειμένου, Προσθήκη κειμένου, Κατάργηση κατά θέση, Αφαιρέστε το διάστημα; Δημιουργία και εκτύπωση υποσύνολων σελιδοποίησης. Μετατροπή περιεχομένου και σχολίων μεταξύ κελιών...
  • Σούπερ φίλτρο (αποθηκεύστε και εφαρμόστε σχήματα φίλτρων σε άλλα φύλλα). Προηγμένη ταξινόμηση ανά μήνα / εβδομάδα / ημέρα, συχνότητα και άλλα. Ειδικό φίλτρο με έντονη, πλάγια ...
  • Συνδυάστε βιβλία εργασίας και φύλλα εργασίας; Συγχώνευση πινάκων βάσει βασικών στηλών. Διαχωρίστε τα δεδομένα σε πολλά φύλλα; Μαζική μετατροπή xls, xlsx και PDF...
  • Περισσότερα από 300 ισχυρά χαρακτηριστικά. Υποστηρίζει Office / Excel 2007-2021 και 365. Υποστηρίζει όλες τις γλώσσες. Εύκολη ανάπτυξη στην επιχείρηση ή τον οργανισμό σας. Πλήρεις δυνατότητες δωρεάν δοκιμής 30 ημερών. Εγγύηση επιστροφής χρημάτων 60 ημερών.
kte καρτέλα 201905

Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη

  • Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
  • Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
  • Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!
κάτω μέρος γραφείου
Σχόλια (0)
Δεν υπάρχουν ακόμη βαθμολογίες. Γίνε ο πρώτος που θα αξιολογήσετε!
Δεν υπάρχουν σχόλια δημοσιεύτηκε ακόμα
Αφήστε τα σχόλιά σας
Δημοσίευση ως επισκέπτης
×
Αξιολογήστε αυτήν την ανάρτηση:
0   Χαρακτήρες
Προτεινόμενες τοποθεσίες

Ακολουθησε μας

Πνευματικά δικαιώματα © 2009 - www.extendoffice.com. | Ολα τα δικαιώματα διατηρούνται. Τροφοδοτείται από ExtendOffice. | Sitemap
Το Microsoft και το λογότυπο του Office είναι εμπορικά σήματα ή σήματα κατατεθέντα της Microsoft Corporation στις Ηνωμένες Πολιτείες ή / και σε άλλες χώρες.
Προστατεύεται από το Sectigo SSL