एक्सेल से सीधे लेबल प्रिंट करें - वर्ड की आवश्यकता नहीं

माइक्रोसॉफ्ट एक्सेल से लेबल प्रिंट करने की सामान्य प्रक्रिया में स्प्रेडशीट को माइक्रोसॉफ्ट वर्ड के साथ मेल मर्ज करना शामिल है। लेकिन कुछ लोग एक्सेल के भीतर सभी काम पूरा करना पसंद करते हैं। सौभाग्य से, वर्ड के साथ शामिल हुए बिना एक्सेल में लेबल प्रिंट करने का एक तरीका है। यह ट्यूटोरियल इस बात पर केंद्रित है कि इसे कैसे पूरा किया जाए।

वर्ड के बिना एक्सेल में लेबल कैसे प्रिंट करें: स्टेप-बाय-स्टेप प्रक्रियाएं

लेबल प्रिंट करने के लिए सीधे एक्सेल से बिना माइक्रोसॉफ्ट वर्ड का उपयोग किए, हमें केवल एक्सेल स्प्रेडशीट को उपयुक्त लेबल साइज के साथ प्रिंट करना होगा। हम सेल साइज को ट्रांसफॉर्म कर सकते हैं जो लेबल साइज को फिट करे। हम इस कार्य को करने के लिए VBA कोड का उपयोग करने जा रहे हैं।

पहले, मान लें कि हमारे पास निम्नलिखित डेटासेट है।

हम पहले प्रत्येक डेटा को लेबल में बदलने जा रहे हैं और फिर उन्हें वर्ड की किसी भी मदद के बिना एक्सेल में प्रिंट करेंगे।

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

चरण 1: डेटा को नई शीट पर कॉपी करें

यहां VBA कोड का चयन केवल तभी ठीक से काम कर सकता है जब सेल एंट्री सेल A1 से शुरू होती है। इसलिए, हमें पहले अपने डेटासेट को व्यवस्थित करना होगा जिसमें सभी लेबल हों। यदि आपका डेटासेट सेल A1 के अलावा कहीं और से शुरू होता है, जैसे हमारा, जो सेल B5 से शुरू होता है, तो पहले उन्हें एक नई स्प्रेडशीट में कॉपी करें और उन्हें बिल्कुल शुरुआत में रखें। यह कुछ इस तरह दिखना चाहिए।

अब यह VBA कोड के साथ काम करने के लिए तैयार होना चाहिए।

चरण 2: VBA कोड डालें

अगला, हमें लेबल को हमारे वांछित साइज और शेप में एडजस्ट करने के लिए VBA कोड डालने की आवश्यकता है। VBA कोड डालने के लिए-

सबसे पहले, अपने रिबन पर डेवलपर्स टैब पर जाएं।
फिर कोड ग्रुप से विजुअल बेसिक चुनें।
परिणामस्वरूप, VBA विंडो खुल जाएगी। अब इसमें इंसर्ट टैब चुनें और ड्रॉप-डाउन मेनू से मॉड्यूल चुनें।
उसके बाद, मॉड्यूल पर जाएं और निम्नलिखित कोड लिखें।

'यह कोड एक्सेल में लेबल बनाएगा 
Sub Createlabels() 
    Application.Run "AskForColumn" 
    Cells.Select 
    Selection.RowHeight = 75.75 
    Selection.ColumnWidth = 34.14 
    With Selection 
        .HorizontalAlignment = xlCenter 
        .VerticalAlignment = xlBottom 
        .WrapText = True 
        .Orientation = 0 
        .AddIndent = False 
        .IndentLevel = 0 
        .ShrinkToFit = False 
        .ReadingOrder = xlContext 
        .MergeCells = False 
    End With 
    With Selection 
        .HorizontalAlignment = xlCenter 
        .VerticalAlignment = xlCenter 
        .WrapText = True 
        .Orientation = 0 
        .AddIndent = False 
        .IndentLevel = 0 
        .ShrinkToFit = False 
        .ReadingOrder = xlContext 
        .MergeCells = False 
    End With 
End Sub 

Sub AskForColumn() 
    Dim refrg As Range 
    Dim vrb As Long 
    Dim dat As Long 
    Set refrg = Cells(Rows.Count, 1).End(xlUp) 
    dat = 1 
    On Error Resume Next 
    incolno = InputBox("Enter Number of Columns Desired") 
    For vrb = 1 To refrg.Row Step incolno 
        Cells(dat, "A").Resize(1, incolno).Value = _ 
        Application.Transpose(Cells(vrb, "A").Resize(incolno, 1)) 
        dat = dat + 1 
    Next 
    Range(Cells(dat, "A"), Cells(refrg.Row, "A")).ClearContents 
End Sub

🔎 कोड व्याख्या

इस VBA कोड में दो भाग या सब्स हैं- CreateLabel सब और AskForColumn सब। पहले, हम समझाएंगे कि AskForColumn सब में क्या हो रहा है और फिर CreateLabel सब पर जाकर समझाएंगे कि कोड कैसे काम करता है।

भाग 1:

बेहतर समझ के लिए, हमने इस भाग को विभिन्न सेक्शन में विभाजित किया है। चर्चा के अंत में आंकड़े देखें।

👉 सेक्शन 1: यह सेक्शन सब AskForColumn का नाम घोषित करता है।

👉 सेक्शन 2: हमने इस सेक्शन का उपयोग तीन वेरिएबल्स घोषित करने के लिए किया है- refrg, vrb, और data।

👉 सेक्शन 3: इस सेक्शन में, हमने refrg और data के लिए वैल्यू सेट की हैं।

👉 सेक्शन 4: इस बिंदु पर, कोड स्प्रेडशीट पर एक इनपुट बॉक्स दिखाता है।

👉 सेक्शन 5: इस सेक्शन में, इनपुट बॉक्स में दर्ज संख्या के लिए एक फॉर लूप चलाया जाता है।

👉 सेक्शन 6: कोड का यह सेक्शन अब सेल्स को रीसाइज करता है।

👉 सेक्शन 7: अंत में, यह सेक्शन अतिरिक्त कंटेंट को क्लियर करता है।

भाग 2:

पिछले भाग के समान, हमने इस सब को भी विभिन्न सेक्शन में विभाजित किया है। दृश्य भाग के लिए चर्चा के अंत में आंकड़ा देखें।

👉 सेक्शन 1: कोड का यह भाग सब का नाम Createlabels घोषित करता है।

👉 सेक्शन 2: यह कमांड कोड के इस बिंदु पर पिछले सब को चलाता है।

👉 सेक्शन 3: यह भाग VBA सेल्स प्रॉपर्टी का उपयोग करके प्रत्येक सेल को फॉर्मेट करता है।

चरण 3: VBA कोड चलाएं

एक बार जब आप कोड दर्ज कर लेते हैं, तो VBA विंडो बंद करें। कोड चलाने के लिए अब इन चरणों का पालन करें।

सबसे पहले, अपने रिबन पर डेवलपर टैब पर जाएं।
दूसरा, कोड ग्रुप से मैक्रोज चुनें।
अब मैक्रो बॉक्स में, मैक्रो नाम के तहत Createlables चुनें।
फिर रन पर क्लिक करें।
अगला, वांछित कॉलम की संख्या चुनें। हम प्रदर्शन के लिए 3 चुन रहे हैं। फिर ओके पर क्लिक करें।

स्प्रेडशीट अब स्वचालित रूप से इस तरह दिखेगी।

लेबल अब वर्ड के किसी भी उपयोग के बिना एक्सेल में प्रिंट करने के लिए तैयार हैं।

और पढ़ें: एक्सेल से एवरी लेबल कैसे प्रिंट करें

चरण 4: कस्टम मार्जिन सेट करें

लेबल प्रिंट करने के लिए, हमें प्रिंटेड पेज के लिए सही मार्जिन सेट करने की आवश्यकता है। इसके लिए, हमें उचित साइज इस तरह चुनना चाहिए कि यह लेबल की स्थिति को प्रभावित न करे या शीट पर किसी लेबल से समझौता न करे। कस्टम मार्जिन सेट करने के लिए, इन चरणों का पालन करें।

सबसे पहले, अपने रिबन पर पेज लेआउट टैब पर जाएं।
फिर आंकड़े में दिखाए अनुसार पेज सेटअप बटन चुनें। आप इसे प्रत्येक ग्रुप के निचले दाएं कोने में पा सकते हैं।
परिणामस्वरूप, पेज सेटअप बॉक्स खुल जाएगा। अब इसमें मार्जिन टैब पर जाएं।
फिर अपने प्रिंटेड पेज के लिए वांछित मार्जिन लंबाई चुनें। हमने निम्नलिखित चुने हैं।
एक बार जब आप कर लें, तो ओके पर क्लिक करें।

चरण 5: प्रिंटिंग के लिए स्केलिंग विकल्प चुनें

लेबल प्रिंट करने के लिए उचित स्केलिंग भी महत्वपूर्ण है। उदाहरण के लिए, हमने अब तक जो किया है वह पेज को इस तरह प्रिंट करेगा।

जो निश्चित रूप से हमारा लक्ष्य नहीं है। इसलिए हमें शीट को एक पेज पर फिट करने की आवश्यकता है। ऐसा करने के लिए-

सबसे पहले, Ctrl+P दबाकर प्रिंट प्रीव्यू सेक्शन पर जाएं।
व्यू के निचले बाएं कोने पर, आप सेटिंग्स पा सकते हैं। उसके तहत, आपको अंत में स्केलिंग विकल्प मिलेंगे।
अब स्केलिंग विकल्प पर क्लिक करें और ड्रॉप-डाउन मेनू से फिट शीट ऑन वन पेज चुनें।

इस बिंदु पर लेबल के लिए स्केलिंग पूरी हो जाएगी।

और पढ़ें: एक्सेल में एड्रेस लेबल कैसे प्रिंट करें

चरण 6: स्प्रेडशीट प्रिंट करें

जब आप अभी भी प्रिंट प्रीव्यू स्क्रीन पर हैं, तो व्यू के ऊपरी बाएं कोने पर प्रिंट पर क्लिक करें।

इस पर क्लिक करें और यह वर्ड की किसी भी मदद के बिना एक्सेल में सभी लेबल प्रिंट करेगा।

याद रखने योग्य बातें

👉 VBA कोड चलाने से पहले, सुनिश्चित करें कि आपके सभी लेबल सेल A1 से शुरू होते हैं।

👉 प्रिंटिंग से पहले उचित मार्जिन और स्केलिंग चुनें ताकि सभी लेबल पेज पर फिट हों। अन्यथा, कुछ कट ऑफ हो सकते हैं।

👉 VBA कोड एक्शन अपरिवर्तनीय हैं। इसलिए सुनिश्चित करें कि कोई भी चलाने से पहले आपके आवश्यक डेटा का बैकअप है।

प्रैक्टिस वर्कबुक डाउनलोड करें

यह प्रिंट करने योग्य लेबल वाली फाइल है।

निष्कर्ष

ये वर्ड का उपयोग किए बिना या माइक्रोसॉफ्ट वर्ड के साथ मेल मर्ज किए बिना एक्सेल में लेबल प्रिंट करने के लिए फॉलो किए जाने वाले चरण थे। उम्मीद है, अब आप वर्ड के बिना एक्सेल में लेबल प्रिंट करने में सक्षम हैं। मुझे आशा है कि आपको यह गाइड उपयोगी और जानकारीपूर्ण लगी। यदि आपके कोई प्रश्न या सुझाव हैं, तो नीचे कमेंट्स में हमें बताएं।

इस तरह के और गाइड के लिए, एक्सेलडेमी पर जाएं।