मेरे पास एक्सेल में लिपटे टेक्स्ट कंटेंट के साथ एक सेल है और मैं सेल को प्रारूपित करना चाहता हूं ताकि इसकी ऊंचाई उस सामग्री को फिट करने के लिए समायोजित हो जाए जो कई लाइनों में फैली हो। मैं इस व्यवहार को कैसे प्राप्त कर सकता हूं?
मेरे पास एक्सेल में लिपटे टेक्स्ट कंटेंट के साथ एक सेल है और मैं सेल को प्रारूपित करना चाहता हूं ताकि इसकी ऊंचाई उस सामग्री को फिट करने के लिए समायोजित हो जाए जो कई लाइनों में फैली हो। मैं इस व्यवहार को कैसे प्राप्त कर सकता हूं?
जवाबों:
से http://support.microsoft.com/kb/149663
सेल में सभी पाठ को फिट करने के लिए पंक्ति की ऊंचाई को समायोजित करने के लिए, इन चरणों का पालन करें:
पंक्ति का चयन करें।
Microsoft Office Excel 2003 और Excel के पूर्व संस्करणों में, स्वरूप मेनू पर पंक्ति को इंगित करें, और तब स्वतः भरण पर क्लिक करें।
Microsoft Office Excel 2007 में, होम टैब पर क्लिक करें, कक्ष समूह में प्रारूप पर क्लिक करें, और उसके बाद AutoFit पंक्ति ऊंचाई पर क्लिक करें।
यह भी काम करता है जब सभी पंक्तियों का चयन किया जाता है
प्रयत्न
कॉलम का चयन करें -> राइट-क्लिक कॉलम -> फॉर्मेट सेल -> एलाइनमेंट टैब -> रैप टेक्स्ट
Wrap Text
करते हैं, तो Excel सबसे लंबी पंक्ति को फिट करने के लिए पंक्ति की ऊँचाई का आकार बदल देगा। उपयुक्त नहीं है यदि पंक्तियों की ऊंचाई गतिशील रूप से बदल रही है, लेकिन यदि आप स्थैतिक पाठ के साथ काम कर रहे हैं तो यह ठीक होना चाहिए।
ध्यान दें कि ऑटोफ़िट विलय की गई कोशिकाओं पर काम नहीं करता है। आपको इसे मैन्युअल रूप से करना होगा।
देखें माइक्रोसॉफ्ट का यह जवाब:
यदि यह स्वचालित रूप से नहीं करता है, तो अपने कर्सर को पंक्ति संख्याओं (उदाहरण: 1 और 2 के बीच) और डबल क्लिक के बीच की छोटी रेखा पर रखें, यह पंक्ति का आकार बदल देगा (उदाहरण के लिए, छोटी रेखा के ठीक ऊपर): 1) ताकि सब कुछ दिखाई दे (एक ऊर्ध्वाधर पहलू से)।
VBA समाधान निम्नलिखित का उपयोग करना है:
Call Application.ActiveCell.AutoFit
एकमात्र तरीका जिसे मैं अपेक्षित रूप से काम करने के लिए प्राप्त कर सकता हूं, वह है कि CTRL-A के साथ पूरी शीट को हाइलाइट करना, टूलबार में "लपेटें पाठ" बटन को अशुद्ध करना, फिर उसे चुनना। कोई अन्य सेटिंग्स नहीं बदलती हैं, लेकिन प्रत्येक पंक्ति अब अपनी सामग्री के लिए "उचित" ऊंचाई है।
मैंने हेडर पंक्ति को आकार देने के लिए निम्न VB कोड बनाया जब एक श्रेणी (B2: B1500) के भीतर एक सेल क्योंकि दिनांक 12/28/2014 से ऊपर का मान हेडर का कारण होगा कि चेतावनी दिखाने के लिए कि ये तिथियां, एक टाइमशीट में, में चली जाएंगी। 2015 का सप्ताह 1:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim KeyCells As Range
' The variable KeyCells contains the cells that will
' cause an Action when they are changed.
Set KeyCells = Range("B2:B1500")
If Not Application.Intersect(KeyCells, Range(Target.Address)) _
Is Nothing Then
' Change the height of the header row when one of the defined cdlls is changed
Rows("1:1").EntireRow.AutoFit
End If
End Sub