एक्सेल में एक पेज पर लंबा कॉलम कैसे प्रिंट करें?
मान लीजिए कि आपके पास एक कॉलम में डेटा की एक लंबी सूची है, शायद 200 पंक्तियाँ, और अब आपको उन्हें प्रिंट करने की आवश्यकता है, लेकिन जब आप प्रिंट करते हैं, तो यह लगभग 5 पेज के पेपर का उपयोग करता है, जिसमें बाईं ओर केवल एक कॉलम होता है, और बहुत सारी सफेद जगह होती है दाएं ओर। वर्ड में, आप कॉलम कर सकते हैं, लेकिन एक्सेल में यह फ़ंक्शन नहीं है। पेपर को बचाने के लिए आप लंबी सूची वाले डेटा को एक पेज पर कैसे प्रिंट करते हैं?
सूत्र के साथ एक पेज पर लंबा कॉलम प्रिंट करें
वीबीए कोड के साथ एक पेज पर लंबा कॉलम प्रिंट करें
एक्सेल के लिए कुटूल के साथ एक पेज पर लंबा कॉलम प्रिंट करें
सूत्र के साथ एक पेज पर लंबा कॉलम प्रिंट करें
यहां मैं आपको इस समस्या को हल करने के लिए एक लंबा फॉर्मूला पेश कर सकता हूं, कृपया इसे इस प्रकार करें:
1. अपनी सक्रिय कार्यपुस्तिका की नई वर्कशीट में, सूत्र दर्ज करें =IF(OFFSET(Sheet1!$A$1,(COLUMN()-1)*45+ROW()-1,0)="","",OFFSET(Sheet1!$A$1,(COLUMN()-1)*45+ROW()-1,0)) सेल A1 में.
नोट्स: Sheet1 वह वर्कशीट है जिसमें वह लंबी सूची है जिसे आप कॉलम करना चाहते हैं।
45 वह पंक्ति संख्या है जिसे आप किसी कॉलम में डेटा सूचीबद्ध करना चाहते हैं।
वे सभी परिवर्तनशील हैं, और आप उन्हें अपनी आवश्यकता के अनुसार बदल सकते हैं।
2. फिर सेल A1 का चयन करें, और भरण हैंडल को पंक्ति 45 तक नीचे खींचें, और फिर डेटा प्रदर्शित होने तक भरण हैंडल को दाईं ओर खींचते रहें। और लंबे कॉलम को नई वर्कशीट में एक पेज पर फिट करने के लिए कई कॉलम में विभाजित किया गया है। स्क्रीनशॉट देखें:
वीबीए कोड के साथ एक पेज पर लंबा कॉलम प्रिंट करें
निम्नलिखित वीबीए कोड आपको डेटा की एक लंबी सूची को कई कॉलमों में विभाजित करने में भी मदद कर सकता है, ताकि आप डेटा प्रिंट कर सकें और कागज बचा सकें।
1. दबाए रखें ALT + F11 कुंजियाँ, और यह खुल जाती है अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.
2। क्लिक करें सम्मिलित करें > मॉड्यूल, और मॉड्यूल विंडो में निम्नलिखित कोड पेस्ट करें।
Sub SingleToMultiColumn()
Dim rng As Range
Dim iCols As Integer
Dim lRows As Long
Dim iCol As Integer
Dim lRow As Long
Dim lRowSource As Long
Dim x As Long
Dim wks As Worksheet
Set rng = Application.InputBox _
(prompt:="Select the range to convert", _
Type:=8)
iCols = InputBox("How many columns do you want?")
lRowSource = rng.Rows.Count
lRows = lRowSource / iCols
If lRows * iCols <> lRowSource Then lRows = lRows + 1
Set wks = Worksheets.Add
lRow = 1
x = 1
For iCol = 1 To iCols
Do While x <= lRows And lRow <= lRowSource
Cells(x, iCol) = rng.Cells(lRow, 1)
x = x + 1
lRow = lRow + 1
Loop
x = 1
Next
End Sub
3। तब दबाएं F5 इस कोड को चलाने के लिए कुंजी, और उस सूची डेटा का चयन करें जिसे आप पॉप अप संवाद बॉक्स में विभाजित करना चाहते हैं, स्क्रीनशॉट देखें:
4। क्लिक करें OK, और उन स्तंभों की संख्या दर्ज करें जिन्हें आप विभाजित करना चाहते हैं। स्क्रीनशॉट देखें:
5. और क्लिक करें OKनई वर्कशीट में लंबे कॉलम को पांच कॉलम में बांटा गया है। स्क्रीनशॉट देखें:
एक्सेल के लिए कुटूल के साथ एक पेज पर लंबा कॉलम प्रिंट करें
लंबा फॉर्मूला और वीबीए कोड दोनों ही आपके लिए कठिन हो सकते हैं, यहां मैं आपको इस समस्या को हल करने के लिए एक आसान और सुविधाजनक तरीका पेश कर सकता हूं। एक्सेल के लिए कुटूलहै एकाधिक कॉलम प्रिंट करें फ़ंक्शन आपको लंबे कॉलम को तुरंत कई कॉलमों में विभाजित करने में मदद कर सकता है ताकि आप उन्हें उचित रूप से प्रिंट कर सकें।
एक्सेल के लिए कुटूल इसमें 300 से अधिक उपयोगी एक्सेल टूल शामिल हैं। 30 दिनों में बिना किसी सीमा के प्रयास करने के लिए निःशुल्क। अब समझे.
जब आपने एक्सेल के लिए कुटूल स्थापित कर लिया है, तो आप निम्न चरणों का पालन कर सकते हैं:
1। क्लिक करें उद्यम > एकाधिक कॉलम प्रिंट करें, स्क्रीनशॉट देखें:
2. में एकाधिक कॉलम प्रिंट करें संवाद बकस:
- पहले क्लिक करें श्रेणी का शीर्षक चुनने के लिए बटन, और फिर दूसरे पर क्लिक करें उस कॉलम का चयन करने के लिए बटन जिसे आप विभाजित करना चाहते हैं।
- फिर उन पंक्तियों की संख्या निर्दिष्ट करें जिनसे आप प्रति पृष्ठ डालना चाहते हैं प्रति मुद्रित पृष्ठ पंक्तियाँ, और नीचे एक पृष्ठ में इच्छित कॉलमों की संख्या दर्ज करें खंडों की संख्या. स्क्रीनशॉट देखें:
3। तब दबायें OK, लंबी सूची डेटा को एक पृष्ठ में पांच कॉलम में विभाजित किया गया है। स्क्रीनशॉट देखें:
टिप्पणियाँ:
1. शीर्षक प्रत्येक कॉलम से पहले जोड़ा जाएगा।
2. यदि आप जाँच करते हैं सक्रिय शीट के साथ एक लिंक बनाएं विकल्प, नए वर्कशीट डेटा को स्रोत डेटा से जोड़ा जा सकता है।
यदि आप इस सुविधा के बारे में अधिक जानना चाहते हैं, तो कृपया क्लिक करें एकाधिक कॉलम प्रिंट करें.
सर्वोत्तम कार्यालय उत्पादकता उपकरण
एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है। वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...
ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है
- Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
- नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
- आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!