मुखपृष्ठ » कैसे » एक्सेल में वर्णमाला क्रम में वर्कशीट टैब्स को कैसे सॉर्ट करें

    एक्सेल में वर्णमाला क्रम में वर्कशीट टैब्स को कैसे सॉर्ट करें

    यदि आपकी Excel कार्यपुस्तिका में बड़ी संख्या में कार्यपत्रक हैं, तो विशिष्ट कार्यपत्रक को खोजना कठिन हो सकता है। अपनी वर्कशीट के टैब को वर्णानुक्रम में क्रमबद्ध करने से यह पता लगाना आसान हो जाएगा कि आपकी तलाश क्या है.

    अपनी कार्यपत्रक टैब को उन पर रंग लगाकर व्यवस्थित करने के अलावा, आप उन्हें वर्णानुक्रम या अल्फ़ान्यूमेरिक रूप से सॉर्ट भी कर सकते हैं, जब तक कि आपने अपने कार्यपत्रकों में कस्टम नाम लागू नहीं किए हैं। दुर्भाग्य से, वर्कशीट टैब को वर्णानुक्रम में सॉर्ट करना Excel में नहीं बनाया गया है, लेकिन आप अपनी कार्यपुस्तिका में एक मैक्रो जोड़ सकते हैं जो आपको अपने टैब को आरोही या अवरोही क्रम में सॉर्ट करने की अनुमति देगा। हम आपको दिखाएंगे कि Microsoft की सहायता साइट पर उपलब्ध मैक्रो को आपकी एक्सेल वर्कबुक में कैसे जोड़ा जाए जो आपकी वर्कशीट टैब को सॉर्ट करेगा.

    शुरू करने के लिए, अनुप्रयोग (VBA) संपादक के लिए Microsoft Visual Basic खोलने के लिए Alt + F11 दबाएँ। फिर, सम्मिलित करें> मॉड्यूल पर जाएं.

    प्रदर्शित होने वाली मॉड्यूल विंडो में Microsoft से निम्न मैक्रो को कॉपी और पेस्ट करें.

    उप Sort_Active_Book () डिम i ए इंटेगर डिम j as Integer डिम iAnswer as VbMsgBoxResult "उपयोगकर्ता को यह निर्देश दें कि वह किस दिशा में 'वर्कशीट को सॉर्ट करना चाहता है।' iAswswer = MsgBox (" Sort Sheets in Ascending Order? "& Chr _ (10) _। & "क्लिकिंग नंबर अवरोही क्रम में सॉर्ट नहीं करेगा", _ vbYesNoCancel + vbQuestion + vbDefaultButton1, "Sort Worksheets") i = 1 के लिए। शीट्स के लिए ।Count for j = 1 To Sheets.Count - 1 "यदि उत्तर हां है, तो सॉर्ट करें।" बढ़ते क्रम में। 'अगर iAnswer = vbYes तो if UCase $ (Sheets (j) .Name)> UCase $ (Sheets (j + 1) .Name) तब Sheets (j) .Move After: = Sheets (j + 1) End if "If। उत्तर नहीं है, फिर अवरोही क्रम में क्रमबद्ध करें। 'ElseIf iAnswer = vbNo तब If UCase $ (Sheets (j) .Name) < UCase$(Sheets(j + 1).Name) Then                Sheets(j).Move After:=Sheets(j + 1)             End If          End If       Next j    Next i End Sub

    VBA संपादक स्वचालित रूप से प्रत्येक मॉड्यूल को अंत में एक संख्या के साथ नाम देता है, जैसे कि Module1, Module2, आदि। आप बस मॉड्यूल के डिफ़ॉल्ट नाम को स्वीकार कर सकते हैं। हालाँकि, यदि आप अपनी कार्यपुस्तिका में अन्य मैक्रोज़ जोड़ने की योजना बनाते हैं, तो प्रत्येक मॉड्यूल का नाम बदलना एक अच्छा विचार है, ताकि आप जान सकें कि वे क्या हैं। हम आपको दिखाने के लिए हमारे मॉड्यूल का नाम बदलेंगे कि कैसे.

    मॉड्यूल का नाम बदलने के लिए, बाएं फलक में गुण के तहत मॉड्यूल के लिए नाम बॉक्स में पाठ का चयन करें.

    नाम बॉक्स में मॉड्यूल के लिए एक नाम टाइप करें और Enter दबाएँ। ध्यान दें कि मॉड्यूल नाम में स्थान नहीं हो सकते.

    बाएं फलक में प्रोजेक्ट के तहत मॉड्यूल सूची में मॉड्यूल का नाम बदलता है.

    फ़ाइल> बंद करके Microsoft Excel में वापस जाकर VBA संपादक को बंद करें.

    अब, हम अपने टैब को सॉर्ट करने के लिए मैक्रो को चलाने जा रहे हैं। मैक्रो संवाद बॉक्स पर मैक्रो की सूची तक पहुंचने के लिए Alt + F8 दबाएं। सूची में मैक्रो का चयन करें (हमारे मामले में केवल एक मैक्रो है), और "रन" पर क्लिक करें.

    निम्न डायलॉग बॉक्स प्रदर्शित करता है, जिससे आप यह चुन सकते हैं कि आप अपने वर्कशीट को आरोही या अवरोही क्रम में क्रमबद्ध करना चाहते हैं। हम उन्हें बढ़ते क्रम में क्रमबद्ध करना चाहते हैं, इसलिए हम "हाँ" पर क्लिक करते हैं.

    वर्कशीट टैब अब वर्णानुक्रम में व्यवस्थित हैं.

    आपके द्वारा जोड़ी गई मैक्रो अभी आपकी कार्यपुस्तिका का हिस्सा है, लेकिन जब आप इसे सहेजते हैं, तो संभवतः आपको निम्नलिखित संवाद बॉक्स दिखाई देगा। ऐसा इसलिए है क्योंकि आपने अपनी कार्यपुस्तिका को एक .xlsx फ़ाइल के रूप में सहेजा है, जो एक सामान्य Excel कार्यपुस्तिका प्रारूप है जिसमें मैक्रोज़ शामिल नहीं हैं। अपनी कार्यपुस्तिका में मैक्रोज़ को शामिल करने के लिए, और उन्हें चलाने में सक्षम होने के लिए, आपको अपनी कार्यपुस्तिका को मैक्रो-सक्षम कार्य, या .xlsm फ़ाइल के रूप में सहेजना होगा। ऐसा करने के लिए, इस संवाद बॉक्स पर "नहीं" पर क्लिक करें.

    इस रूप में सहेजें संवाद बॉक्स प्रदर्शित होता है। यदि आप पहले से ही उस फ़ोल्डर में नहीं हैं, तो मैक्रो-सक्षम कार्यपुस्तिका को सहेजना चाहते हैं, पर नेविगेट करें। "एक्सेल मैक्रो-सक्षम कार्यपुस्तिका (* .xlsm)" का चयन "प्रकार के रूप में सहेजें" ड्रॉप-डाउन सूची से करें.

    "सहेजें" पर क्लिक करें.

    यदि आप कार्यपुस्तिका को मैक्रो-सक्षम कार्यपुस्तिका (.xlsm फ़ाइल) के रूप में सहेजते नहीं हैं, तो आपके द्वारा जोड़े गए मैक्रो को हटा दिया जाएगा। यदि आप अधिक कार्यपत्रक टैब जोड़ना चाहते हैं और मैक्रो का उपयोग करके उन्हें फिर से सॉर्ट करना चाहते हैं, तो आप अपनी कार्यपुस्तिका के .xlsx संस्करण को हटाना चाहते हैं ताकि आप अपनी कार्यपुस्तिका के .xlsm संस्करण का उपयोग करना न भूलें। यदि आप मैक्रोज़ का उपयोग नहीं करना चाहते हैं, तो आप हमेशा एक .xlsx फ़ाइल के रूप में कार्यपुस्तिका को सहेज सकते हैं.