Excel में प्रिंट क्षेत्र को अंतिम पंक्ति में कैसे सेट करें?
एक्सेल में, डिफ़ॉल्ट रूप से, यह प्रिंट क्षेत्र के रूप में डेटा के साथ अंतिम पंक्ति तक पूरी वर्कशीट सेट करेगा। लेकिन इस मामले में, मैं कॉलम ए से कॉलम सी तक अंतिम पंक्ति तक डेटा के साथ प्रिंट करना चाहता हूं जैसा नीचे स्क्रीनशॉट में दिखाया गया है, क्या इसे संभालने का कोई तरीका है?
प्रिंट चयन द्वारा डेटा के साथ प्रिंट क्षेत्र को अंतिम पंक्ति में सेट करें
VBA द्वारा डेटा के साथ प्रिंट क्षेत्र को अंतिम पंक्ति में सेट करें
प्रिंट चयन द्वारा डेटा के साथ प्रिंट क्षेत्र को अंतिम पंक्ति में सेट करें
किसी चयन को डेटा के साथ अंतिम पंक्ति में प्रिंट करने के लिए, आप प्रिंटिंग से पहले प्रिंट क्षेत्र को निर्दिष्ट चयन में बदल सकते हैं।
1। पकड़ कंट्रोल कुंजी फिर उन कॉलमों का चयन करें जिन्हें आप प्रिंट करना चाहते हैं। स्क्रीनशॉट देखें:
2। क्लिक करें पट्टिका > छाप, और उसके बाद चुनें प्रिंट चयन से की स्थापना अनुभाग। स्क्रीनशॉट देखें:
प्रिंट क्षेत्र को डेटा के साथ अंतिम पंक्ति पर सेट करें
यहां मैं इस ऑपरेशन को करने के लिए एक मैक्रो कोड भी प्रस्तुत करता हूं।
1. आपके द्वारा उपयोग की जाने वाली शीट को सक्षम करें, दबाएँ ऑल्ट + F11 खोलने के लिए चाबी अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक विंडो, और क्लिक करें सम्मिलित करें > मॉड्यूल. स्क्रीनशॉट देखें.
2. नीचे दिए गए कोड को पेस्ट करें मॉड्यूल स्क्रिप्ट, और दबाएँ F5 चलाने की कुंजी.
वीबीए: क्षेत्र को अंतिम पंक्ति पर सेट करें
'UpdatebyExtendoffice20170811
Dim xRg As Range
Dim xRgLRow As Long
Dim xRgAddress As String
On Error Resume Next
xRgAddress = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Select a range：", "KuTools For Excel", xRgAddress, , , , , 8)
xRg.Select
xRgLRow = xRg.SpecialCells(xlCellTypeLastCell).Row
xRgAddress = Left(xRg.Address(1, 1), Len(xRg.Address(1, 1)) - 2)
xRgAddress = xRgAddress & xRgLRow
ActiveSheet.PageSetup.PrintArea = xRgAddress
End Sub
3. एक संवाद पॉप आउट होता है जो आपको उस कॉलम श्रेणी का चयन करने की याद दिलाता है जिसका आप उपयोग करना चाहते हैं। स्क्रीनशॉट देखें:
4। क्लिक करें OK, मुद्रण क्षेत्र सेट कर दिया गया है।
सर्वोत्तम कार्यालय उत्पादकता उपकरण
एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है। वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...
ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है
- Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
- नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
- आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!
