वर्ड के बिना एक्सेल लेबल बनाएं: एक सरल चरण-दर-चरण मार्गदर्शिका

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

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

लेबल क्या हैं?

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

VBA का उपयोग करके वर्ड के बिना एक्सेल में लेबल बनाने के 4 चरण

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

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

चरण 01: एक्सेल में डेटा को नई शीट में कॉपी करें

• सबसे पहले, कॉलम में पतों को कॉपी करें और उन्हें सेल A1 से शुरू करके एक नई शीट में पेस्ट करें।

चरण 02: एक्सेल में VBA विंडो खोलें और एक मॉड्यूल बनाएं

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

आखिरकार, ये चरण VBA विंडो खोलेंगे और आपकी शीट में एक नया मॉड्यूल डालेंगे।

चरण 03: एक्सेल में कोड डालें

• इस बिंदु पर, निम्न कोड कॉपी करें और इसे खाली बॉक्स में पेस्ट करें।

'यह कोड एक्सेल में लेबल बनाएगा Sub Createlabels() Application.Run "AskForColumn" Cells.Select Selection.RowHeight = 75.75 Selection.ColumnWidth = 34.14 With Selection .HorizontalAlignment = xlCenter .VerticalAlignment = xlBottom .WrapText = False .Orientation = 0 .AddIndent = False .IndentLevel = 0 .ShrinkToFit = False .ReadingOrder = xlContext .MergeCells = False End With With Selection .HorizontalAlignment = xlCenter .VerticalAlignment = xlCenter .WrapText = False .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("वांछित कॉलम की संख्या दर्ज करें") 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 

💡 कोड व्याख्या:

इस स्तर पर, मैं ऊपर उपयोग किए गए कोड की व्याख्या करूंगा। जैसा कि आप देख सकते हैं, इस कोड के दो भाग हैं। एक भाग में सब AskForColumn() है जिसे भाग 01 कहा जाएगा, और दूसरा सब Createlabels() है जिसे भाग 02 कहा जाएगा। अब, मैं इन दोनों भागों को एक-एक करके समझाऊंगा।

भाग 01:

इस बिंदु पर, मैंने कोड को विभिन्न अनुभागों में विभाजित किया है और निम्नलिखित स्क्रीनशॉट में प्रत्येक अनुभाग को नंबर दिया है। नतीजतन, यहां मैं प्रत्येक अनुभाग को उनके नंबर के अनुसार समझाऊंगा।

• अनुभाग 1: यह अनुभाग AskForColumn नामक एक सब बनाता है।
• अनुभाग 2: यहां, हम विभिन्न चर घोषित करते हैं।
• अनुभाग 3: इस अनुभाग में, हम कॉलम में पंक्तियों की संख्या गिनते हैं।
• अनुभाग 4: अब, यहां हम वांछित कॉलम की संख्या पूछने के लिए एक इनपुटबॉक्स बनाते हैं।
• अनुभाग 5: इस अनुभाग में, हम एक फॉर लूप चलाते हैं। साथ ही, हम लूप को इनपुटबॉक्स में डाली गई संख्या के बराबर बार चलाने के लिए स्टेप कीवर्ड का उपयोग करते हैं।
• अनुभाग 6: इस चरण में, यहां हम एप्लिकेशन ट्रांसपोज़ और प्रॉपर्टी आकार बदलें का उपयोग करके कॉलम के सेल को विभिन्न पंक्तियों और कॉलम में वितरित करने के लिए इस अनुभाग का उपयोग करते हैं।
• अनुभाग 7: अंत में, हम इस अनुभाग में अतिरिक्त सामग्री हटाते हैं।

भाग 02:

इस मामले में भी, मैंने कोड को विभिन्न अनुभागों में विभाजित किया है और निम्नलिखित स्क्रीनशॉट में प्रत्येक अनुभाग को नंबर दिया है। नतीजतन, यहां मैं प्रत्येक अनुभाग को उनके नंबर के अनुसार समझाऊंगा।

• अनुभाग 1: यह अनुभाग Createlabels() नामक एक सब बनाता है।
• अनुभाग 2: इस अनुभाग में, हम सब AskForColumn() को चलाने के लिए कॉल करते हैं।
• अनुभाग 3: इस बिंदु पर, यह अनुभाग सेल प्रारूप को सेल प्रॉपर्टी का उपयोग करके सभी सेल के लिए परिभाषित करता है।

चरण 04: वर्ड के बिना एक्सेल में लेबल बनाने के लिए कोड चलाएं

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

• अंत में, आपके लेबल नीचे स्क्रीनशॉट की तरह बन जाएंगे।

💡 नोट्स:

• यह विधि केवल तभी काम करेगी जब आपका डेटा एक ही कॉलम में हो।
• लेबल बनाने के बाद, आप होम टैब में सभी बॉर्डर विकल्प का उपयोग करके बॉर्डर जोड़ सकते हैं।
• साथ ही, सुनिश्चित करें कि आप सब Createlabels() चलाते हैं। इस मामले में, यदि आप सब AskForColumn() चलाते हैं, तो आपको अपना वांछित परिणाम नहीं मिलेगा।
• इसके अलावा, कॉलम A में पतों के अलावा कुछ भी दर्ज न करें।

और पढ़ें: एक्सेल सूची से वर्ड में लेबल कैसे बनाएं (चरण-दर-चरण दिशानिर्देश)

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

उपरोक्त चरणों का उपयोग करके लेबल बनाने के बाद, अब आप लेबल प्रिंट करना चाह सकते हैं। अब, यदि आप ऐसा करना चाहते हैं, तो आप नीचे दिए गए चरणों का पालन कर सकते हैं।

चरण:

• सबसे पहले, पेज के शीर्ष से पेज लेआउट टैब पर जाएं।
• अगला, पेज सेटअप बटन पर क्लिक करें।

• उसके बाद, मार्जिन पर जाएं।
• अब, ऊपर और नीचे मार्जिन को 0.5 पर संपादित करें और फिर बाएं और दाएं मार्जिन को 0.215 पर संपादित करें।
• नतीजतन, ओके पर क्लिक करें।

• अब, प्रिंट मेनू खोलने के लिए CTRL + P दबाएं।
• इस बिंदु पर, कोई स्केलिंग नहीं पर क्लिक करें और 4 विकल्प दिखाई देंगे।
• अगला, उन विकल्पों में से एक पेज पर सभी कॉलम फिट करें चुनें।

• अंत में, आप प्रिंट करने के लिए तैयार हैं।
• इस मामले में, आपका प्रिंट पूर्वावलोकन नीचे स्क्रीनशॉट की तरह होगा।

और पढ़ें: एक्सेल से वर्ड में मेल मर्ज लेबल कैसे करें (आसान चरणों के साथ)

निष्कर्ष

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

संबंधित लेख

• एक्सेल में पता लेबल कैसे प्रिंट करें (2 त्वरित तरीके)
• एक्सेल में मेलिंग लेबल कैसे बनाएं (आसान चरणों के साथ)
• एक्सेल फ़ाइल को मेलिंग लेबल में कैसे मर्ज करें (आसान चरणों के साथ)
• एक्सेल से एवरी लेबल कैसे प्रिंट करें (2 सरल तरीके)