मुख्य सामग्री पर जाएं

एक्सेल में एक पेज पर एकाधिक चयन कैसे प्रिंट करें?

लेखक: ज़ियाओयांग अंतिम संशोधित: 2020-07-17

यदि आपके पास एक बड़ी वर्कशीट है जिसमें बहुत अधिक डेटा है, और अब, आप कुछ चयनित श्रेणियां जो गैर-निरंतर हैं, उन्हें एक पृष्ठ में प्रिंट करना चाहते हैं, ताकि आप अधिक कागज बचा सकें। एक्सेल प्रदान करता है प्रिंट एरिया सेट करें हमारे लिए कई चयनों को एक साथ मुद्रित करने की सुविधा है, लेकिन, प्रत्येक चयनित श्रेणी को एक पृष्ठ पर अलग से मुद्रित किया जाएगा। यह आलेख इस बारे में बात करेगा कि एक पृष्ठ पर एकाधिक गैर-निरंतर चयनों को कैसे मुद्रित किया जाए।

VBA कोड के साथ एक वर्कशीट से एक पेज पर एकाधिक चयन प्रिंट करें

एक्सेल के लिए कुटूल के साथ एक पृष्ठ पर एक या एकाधिक वर्कशीट से एकाधिक चयन प्रिंट करें


VBA कोड के साथ एक वर्कशीट से एक पेज पर एकाधिक चयन प्रिंट करें

एक वर्कशीट के कई चयनित गैर-सन्निहित चयनों को एक पृष्ठ में मुद्रित करने के लिए, निम्नलिखित वीबीए कोड आपकी मदद कर सकता है, कृपया निम्नानुसार कार्य करें:

1। दबाएँ कंट्रोल उन श्रेणियों का चयन करने के लिए कुंजी जिन्हें आप प्रिंट करना चाहते हैं।

2. दबाए रखें ALT + F11 कुंजियाँ, और यह खुल जाती है अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.

3। क्लिक करें सम्मिलित करें > मॉड्यूल, और निम्नलिखित कोड को इसमें पेस्ट करें मॉड्यूल खिड़की।

वीबीए कोड: एकाधिक चयनों को एक पृष्ठ में प्रिंट करें

Sub PrintOutRange()
'Updateby Extendoffice
Dim xRng1 As Range
Dim xRng2 As Range
Dim xNewWs As Worksheet
Dim xWs As Worksheet
Dim xIndex As Long
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Set xWs = ActiveSheet
Set xNewWs = Worksheets.Add
xWs.Select
xIndex = 1
For Each xRng2 In Selection.Areas
    xRng2.Copy
    Set xRng1 = xNewWs.Cells(xIndex, 1)
    xRng1.PasteSpecial xlPasteValues
    xRng1.PasteSpecial xlPasteFormats
    xIndex = xIndex + xRng2.Rows.Count
Next
xNewWs.Columns.AutoFit
xNewWs.PrintOut
xNewWs.Delete
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub

4। फिर दबायें F5 इस कोड को चलाने के लिए कुंजी, और आपकी चयनित श्रेणियाँ एक ही बार में मुद्रित हो जाएंगी, और वे एक ही पृष्ठ में मुद्रित हो जाएंगी।


एक्सेल के लिए कुटूल के साथ एक पृष्ठ पर एक या एकाधिक वर्कशीट से एकाधिक चयन प्रिंट करें

उपरोक्त कोड केवल आपको एक वर्कशीट से चयनित श्रेणियों को प्रिंट करने में मदद कर सकता है, यदि आप चाहते हैं कि कई वर्कशीट से एकाधिक चयन एक पृष्ठ में मुद्रित हों, तो उपरोक्त कोड काम नहीं करेगा। कृपया चिंता न करें, यहां, मैं आपको एक उपयोगी टूल पेश कर सकता हूं - एक्सेल के लिए कुटूल, के साथ अपने एकाधिक चयन विज़ार्ड प्रिंट करें उपयोगिता, आप एक वर्कशीट या एकाधिक वर्कशीट से चयनों को एक बार में एक पृष्ठ पर प्रिंट कर सकते हैं।

एक्सेल के लिए कुटूल : 300 से अधिक उपयोगी एक्सेल ऐड-इन्स के साथ, 30 दिनों में बिना किसी सीमा के आज़माने के लिए निःशुल्क

स्थापित करने के बाद एक्सेल के लिए कुटूल, कृपया निम्नलिखित चरणों का पालन करें:

1। क्लिक करें कुटूल्स प्लस > मुद्रण > एकाधिक चयन विज़ार्ड प्रिंट करें, स्क्रीनशॉट देखें:

2. में एकाधिक चयन विज़ार्ड प्रिंट करेंक्लिक करें,दस्तावेज़ जोड़ें बटन उस रेंज को चुनने और जोड़ने के लिए बटन जिसे आप प्रिंट करने के लिए रेंज सूची बॉक्स में एक-एक करके प्रिंट करना चाहते हैं, (आप एक वर्कशीट या एकाधिक वर्कशीट से रेंज का चयन कर सकते हैं), क्लिक करें दस्तावेज़ हटाएँ बटन बटन उन श्रेणियों को हटा सकता है जिनकी आपको आवश्यकता नहीं है, स्क्रीनशॉट देखें:

दस्तावेज़ एकाधिक चयन प्रिंट करें 2

3. चयनों को सूची बॉक्स में जोड़ने के बाद, कृपया क्लिक करें अगला >> विज़ार्ड के चरण 2 पर जाने के लिए बटन, अपनी आवश्यकता के अनुसार प्रिंट सेटिंग्स निर्दिष्ट करें, और आप चेक द्वारा चयनित श्रेणियों के बीच एक खाली पंक्ति जोड़ सकते हैं श्रेणियों के बीच एक रिक्त पंक्ति जोड़ें विकल्प, स्क्रीनशॉट देखें:

दस्तावेज़ एकाधिक चयन प्रिंट करें 3

4. फिर क्लिक करते जाइये अगला >> लेकिन, विज़ार्ड के चरण 3 में, अस्थायी वर्कशीट के लिए कार्रवाई निर्दिष्ट करें, आप वर्कशीट को सक्रिय कर सकते हैं लेकिन प्रिंट नहीं कर सकते हैं, वर्कशीट को प्रिंट करें और इसे रखें या वर्कशीट को प्रिंट करें और इसे हटा दें। स्क्रीनशॉट देखें:

दस्तावेज़ एकाधिक चयन प्रिंट करें 4

5। क्लिक करें अंत बटन, सभी चयनित श्रेणियाँ एक लिंक किए गए चित्र ऑब्जेक्ट के रूप में एक नई वर्कशीट में चिपका दी गई हैं। और आप उन्हें वर्कशीट में खींचकर पुनर्व्यवस्थित कर सकते हैं। स्क्रीनशॉट देखें:

दस्तावेज़ एकाधिक चयन प्रिंट करें 5

6. जब आप इस नई वर्कशीट को प्रिंट करेंगे, तो श्रेणियाँ आपकी आवश्यकता के अनुसार एक ही पृष्ठ में मुद्रित हो जाएंगी।

इस प्रिंट मल्टीपल सिलेक्शन विज़ार्ड उपयोगिता के बारे में अधिक जानने के लिए क्लिक करें।

एक्सेल के लिए कुटूल अभी डाउनलोड करें और निःशुल्क परीक्षण करें!


डेमो: एक्सेल के लिए कुटूल के साथ एक पेज पर एक या एकाधिक वर्कशीट से एकाधिक चयन प्रिंट करें

एक्सेल के लिए कुटूल: 300 से अधिक उपयोगी एक्सेल ऐड-इन्स के साथ, 30 दिनों में बिना किसी सीमा के आज़माने के लिए निःशुल्क। अभी डाउनलोड करें और निःशुल्क परीक्षण करें!

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

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

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

Description


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

  • Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
  • नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
  • आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!
Comments (2)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
how to print selection area with multi print ? i means selection area i wan to print 10 times
This comment was minimized by the moderator on the site
I tried your VBA code with Excel 2016 and I get an error: Compile Error: Sub of Function not defined. This line is highlighted: Set xRng1 = xNewWs.Cells(xIndex, 1)
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations