यहां बताया गया है कि अपनी तालिकाओं को वर्णानुक्रम में कैसे दिया जाए
आपकी सूचियों में डेटा को वर्णानुक्रम में क्रमबद्ध करना कोई समस्या नहीं है। लेकिन जब आप वर्कशीट को उनके नाम के अनुसार वर्णानुक्रम में रखना चाहते हैं तो आप इसके बारे में कैसे जाते हैं?
निम्नलिखित चित्रण कार्यपत्रकों की एक श्रृंखला के साथ एक शीट रजिस्टर दिखाता है। उन्हें वर्णानुक्रम में क्रमबद्ध किया जाना चाहिए ताकि उन्हें ढूंढना आसान हो।
3
कुछ शीट के साथ, आप मज़बूती से काम को मैन्युअल रूप से कर सकते हैं। कई चादरों के साथ यह जल्दी से कठिन, समय लेने वाली और भ्रमित करने वाली हो जाती है। निम्नलिखित मैक्रो आपकी और मदद करेगा:
सब सॉर्टब्लेटर ()
Dim Zaehler1 पूर्णांक के रूप में, Zaehler2 पूर्णांक के रूप में
स्ट्रिंग के रूप में मंद नाम
नाम = एक्टिवशीट.नाम
Zaehler1 = 1 के लिए कार्यपत्रकों के लिए। गणना
Zaehler2 = Zaehler1 के लिए कार्यपत्रकों के लिए। गणना
यदि UCase (वर्कशीट्स (काउंटर 2)। नाम) <UCase (वर्कशीट्स (काउंटर 1)। नाम) तो
वर्कशीट्स (ज़ाहलर 2)। पहले ले जाएँ: = वर्कशीट्स (ज़ाहलर 1)
अगर अंत
अगला काउंटर2, काउंटर1
कार्यपत्रक (नाम) .सक्रिय करें
अंत उप
मैक्रो सक्रिय कार्यपुस्तिका में कार्यपत्रकों को वर्णानुक्रम से आरोही क्रम में सॉर्ट करता है। निम्नलिखित आंकड़ा दिखाता है कि मैक्रो शुरू करने के बाद नमूना कार्यपुस्तिका कैसी दिखती है:
युक्ति: यदि आप जानना चाहते हैं कि एक्सेल में मैक्रो कैसे दर्ज करें और शुरू करें, तो आपको यहां एक संक्षिप्त विवरण मिलेगा: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -macros- in-excel-ein.html