एक्सेल में सामग्री को फिट करने के लिए टेक्स्ट बॉक्स का आकार स्वचालित रूप से कैसे बदलें?

टेक्स्ट बॉक्स का आकार वर्कशीट में डालने के बाद तय किया जाता है। इसलिए आकार आपके द्वारा डाले गए या हटाए गए टेक्स्ट में फिट होने के लिए समायोजित नहीं होगा। इस आलेख का उद्देश्य आपको एक्सेल में सामग्री को फिट करने के लिए टेक्स्ट बॉक्स को स्वचालित रूप से आकार देने के तरीके दिखाना है।

टेक्स्ट सुविधा के अनुसार आकार का आकार बदलकर सामग्री को फिट करने के लिए टेक्स्ट बॉक्स का स्वतः आकार बदलें
वीबीए कोड द्वारा सामग्री को फिट करने के लिए सभी टेक्स्ट बॉक्स का स्वतः आकार बदलें

टेक्स्ट सुविधा के अनुसार आकार का आकार बदलकर सामग्री को फिट करने के लिए टेक्स्ट बॉक्स का स्वतः आकार बदलें

अद्भुत! एक्सेल में क्रोम, एज, फ़ायरफ़ॉक्स और सफारी जैसे कुशल टैब का उपयोग करना!
अपना 50% समय बचाएं, और हर दिन आपके लिए हजारों माउस क्लिक कम करें!

आप टेक्स्ट बॉक्स की प्रॉपर्टी को निम्नानुसार बदल सकते हैं ताकि यह आपके द्वारा दर्ज किए गए या हटाए गए टेक्स्ट के साथ स्वचालित रूप से आकार बदल सके।

1. टेक्स्ट बॉक्स डालने के बाद टेक्स्ट बॉक्स के बॉर्डर पर राइट क्लिक करें और फिर क्लिक करें आकार और गुण राइट-क्लिक मेनू से. स्क्रीनशॉट देखें:

2. आप देख सकते हैं ए स्वरूप आकार फलक वर्कशीट के दाईं ओर, के अंतर्गत प्रदर्शित होता है आकार और गुण टैब, जांचें पाठ को फिट करने के लिए आकार का आकार बदलें इन बॉक्स पाठ बॉक्स अनुभाग, और फिर बंद करें स्वरूप आकार फलक. स्क्रीनशॉट देखें:

अब से, सामग्री को फिट करने के लिए टेक्स्ट बॉक्स का आकार स्वचालित रूप से बदल जाएगा।

नोट: इस पद्धति के साथ, यदि कई टेक्स्ट बॉक्स बदलने हैं, तो आपको टेक्स्ट बॉक्स के गुणों को एक-एक करके बदलना होगा।

वीबीए कोड द्वारा सामग्री को फिट करने के लिए सभी टेक्स्ट बॉक्स का स्वतः आकार बदलें

एक वर्कशीट के लिए जिसमें पहले से ही कई टेक्स्ट बॉक्स हैं, निम्नलिखित वीबीए कोड आपको एक ही बार में सामग्री को फिट करने के लिए स्वचालित रूप से उनका आकार बदलने में मदद कर सकता है।

1। दबाएँ ऑल्ट + F11 खोलने के लिए एक साथ कुंजियाँ अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.

2। में अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की, क्लिक करें सम्मिलित करें > मॉड्यूल. फिर नीचे दिए गए 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 कोड चलाने की कुंजी. फिर आप देख सकते हैं कि वर्तमान वर्कशीट में सभी टेक्स्ट बॉक्स स्वचालित रूप से इसकी सामग्री को फिट करने के लिए नीचे स्क्रीनशॉट में दिखाए गए अनुसार आकार बदल दिए गए हैं।

और ये टेक्स्ट बॉक्स भविष्य में उपयोग में आपके द्वारा दर्ज की गई या हटाई गई सामग्री के साथ स्वचालित रूप से आकार बदल देंगे।

संबंधित लेख:

• एक्सेल में इसकी सामग्री को फिट करने के लिए टिप्पणी बॉक्स को स्वचालित आकार कैसे दें?

सर्वोत्तम कार्यालय उत्पादकता उपकरण

🤖	कुटूल्स एआई सहयोगी: निम्न के आधार पर डेटा विश्लेषण में क्रांति लाएं: बुद्धिमान निष्पादन   |  कोड जनरेट करें  |  कस्टम फ़ॉर्मूले बनाएं  |  डेटा का विश्लेषण करें और चार्ट बनाएं  |  कुटूल फ़ंक्शंस का आह्वान करें...
	लोकप्रिय सुविधाएँ: डुप्लिकेट ढूंढें, हाइलाइट करें या पहचानें   |  रिक्त पंक्तियाँ हटाएँ   |  डेटा खोए बिना कॉलम या सेल को संयोजित करें   |   फॉर्मूला के बिना गोल ...
	सुपर लुकअप: एकाधिक मानदंड VLookup  |   मल्टीपल वैल्यू वीलुकअप  |   अनेक शीटों में VLookup   |   फजी लुकअप ....
	उन्नत ड्रॉप-डाउन सूची: शीघ्रता से ड्रॉप डाउन सूची बनाएं   |  आश्रित ड्रॉप डाउन सूची   |  बहु-चयन ड्रॉप डाउन सूची ....
	स्तम्भ प्रबंधक: कॉलमों की एक विशिष्ट संख्या जोड़ें  |  कॉलम ले जाएँ  |  छिपे हुए कॉलम की दृश्यता स्थिति टॉगल करें  |  रेंज और कॉलम की तुलना करें ...
	फीचर्ड फीचर्स: ग्रिड फोकस   |  डिजाइन देखें   |   बड़ा फॉर्मूला बार   |  कार्यपुस्तिका एवं शीट प्रबंधक   |  संसाधन लाइब्रेरी (ऑटो टेक्स्ट)   |  खजूर बीनने वाला   |  कार्यपत्रकों को संयोजित करें   |  एन्क्रिप्ट/डिक्रिप्ट सेल   |  सूची के अनुसार ईमेल भेजें   |  सुपर फ़िल्टर   |   विशेष फ़िल्टर (फ़िल्टर बोल्ड/इटैलिक/स्ट्राइकथ्रू...) ...
	शीर्ष 15 टूलसेट:  12 टेक्स्ट टूल्स (पाठ जोड़ें, अक्षर हटाएँ, ...)   |   50 + चार्ट प्रकार (गैन्ट चार्ट, ...)   |   40+ प्रैक्टिकल सूत्र (जन्मदिन के आधार पर आयु की गणना करें, ...)   |   19 निवेशन टूल्स (QR कोड डालें, पथ से चित्र सम्मिलित करें, ...)   |   12 रूपांतरण टूल्स (शब्दों को संख्याएँ, मुद्रा रूपांतरण, ...)   |   7 विलय और विभाजन टूल्स (उन्नत संयोजन पंक्तियाँ, विभाजन कोशिकाओं, ...)   |   ... और अधिक

एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है।  वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...

अधिक पढ़ें... मुफ्त डाउनलोड...

---

ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है

• Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
• नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
• आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!

अधिक पढ़ें... मुफ्त डाउनलोड...