मुख्य सामग्री पर जाएं

Excel में कक्षों की श्रेणी से अनुक्रम कार्यपत्रक कैसे बनाएं?

लेखक: ज़ियाओयांग अंतिम संशोधित: 2013-10-24

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

डॉक-क्रिएट-शीट्स-फ्रॉम-लिस्ट1

VBA कोड वाले कक्षों की सूची से अनुक्रम कार्यपत्रक बनाएं

Excel के लिए कुटूल के साथ कक्षों की सूची से अनुक्रम कार्यपत्रक बनाएं


तीर नीला दायां बुलबुला VBA कोड वाले कक्षों की सूची से अनुक्रम कार्यपत्रक बनाएं

निम्नलिखित वीबीए कोड आपको कुछ वर्कशीट जोड़ने में मदद कर सकता है जिनका नाम मौजूदा वर्कशीट के बाद सेल सामग्री के आधार पर रखा गया है। कृपया इस प्रकार करें:

1. दबाए रखें ALT + F11 चाबियाँ, फिर यह खुलता है अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.

2। क्लिक करें सम्मिलित करें > मॉड्यूल, और निम्नलिखित कोड को इसमें पेस्ट करें मॉड्यूल विंडो.

वीबीए कोड: कोशिकाओं की सूची के आधार पर अनुक्रम कार्यपत्रक जोड़ें

Sub CreateWorkSheetByRange()
'Update 20130829
Dim WorkRng As Range
Dim Ws As Worksheet
Dim arr As Variant
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
arr = WorkRng.Value
Application.ScreenUpdating = False
For i = 1 To UBound(arr, 1)
    For j = 1 To UBound(arr, 2)
        Set Ws = Worksheets.Add(after:=Application.ActiveSheet)
        Ws.Name = arr(i, j)
    Next
Next
Application.ScreenUpdating = True
End Sub

3। फिर दबायें F5 इस कोड को चलाने के लिए कुंजी, और फिर आपके लिए उस रेंज का चयन करने के लिए एक प्रॉम्प्ट बॉक्स पॉप आउट हो जाएगा जिसे आप उपयोग करना चाहते हैं। स्क्रीनशॉट देखें:

डॉक-क्रिएट-शीट्स-फ्रॉम-लिस्ट2

4। और फिर क्लिक करें OK, सेल मानों द्वारा नामित वर्कशीट को मौजूदा वर्कशीट के बाद जोड़ा गया है। स्क्रीनशॉट देखें:

डॉक-क्रिएट-शीट्स-फ्रॉम-लिस्ट3

टिप्पणियाँ:

1. नई वर्कशीट वर्तमान वर्कशीट के बाद डाली जाएगी।

2. यदि चयनित श्रेणी में रिक्त कक्ष शामिल हैं, तो वर्कशीट का नाम डिफ़ॉल्ट के आधार पर रखा जाता है। स्क्रीनशॉट देखें:

डॉक-क्रिएट-शीट्स-फ्रॉम-लिस्ट4
-1
डॉक-क्रिएट-शीट्स-फ्रॉम-लिस्ट5

तीर नीला दायां बुलबुला Excel के लिए कुटूल के साथ कक्षों की सूची से अनुक्रम कार्यपत्रक बनाएं

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

एक्सेल के लिए कुटूल इसमें 300 से अधिक उपयोगी एक्सेल टूल शामिल हैं। 30 दिनों में बिना किसी सीमा के प्रयास करने के लिए निःशुल्क। अब समझे.

एक्सेल के लिए कुटूल स्थापित करने के बाद, कृपया निम्नलिखित चरणों का पालन करें:

1. उस श्रेणी का चयन करें जिसके आधार पर आप वर्कशीट बनाना चाहते हैं।

2. क्लिक करें उद्यम > वर्कशीट उपकरण > अनुक्रम वर्कशीट बनाएं, स्क्रीनशॉट देखें:

डॉक-क्रिएट-शीट्स-फ्रॉम-लिस्ट6

3. में अनुक्रम वर्कशीट बनाएं संवाद बॉक्स में, वह वर्कशीट प्रकार चुनें जिसे आप नई अनुक्रम वर्कशीट बनाना चाहते हैं, और फिर जांचें एक श्रेणी में डेटा विकल्प, स्क्रीनशॉट देखें:

डॉक-क्रिएट-शीट्स-फ्रॉम-लिस्ट7

4। तब दबायें OK संवाद बॉक्स को बंद करने के लिए, और एक नई कार्यपुस्तिका बनाई गई है जिसमें कार्यपत्रकों को चयनित श्रेणी डेटा द्वारा नामित किया गया है। स्क्रीनशॉट देखें:

डॉक-क्रिएट-शीट्स-फ्रॉम-लिस्ट8

टिप्पणियाँ:

1. यदि आप शीट 1 या शीट 2 चुनते हैं, तो बनाई गई नई वर्कशीट शीट 1 या शीट 2 के समान स्वरूपण वाली होंगी।

2. नई वर्कशीट एक नई वर्कबुक में बनाई जाती हैं।

3. यदि चयनित श्रेणी में रिक्त कक्ष शामिल हैं, तो वर्कशीट का नाम डिफ़ॉल्ट के आधार पर रखा जाता है। स्क्रीनशॉट देखें:

डॉक-क्रिएट-शीट्स-फ्रॉम-लिस्ट9
-1
डॉक-क्रिएट-शीट्स-फ्रॉम-लिस्ट10

इस क्रिएट सीक्वेंस वर्कशीट सुविधा के बारे में अधिक जानने के लिए क्लिक करें।


संबंधित लेख:

एक्सेल में अनुकूलित नामों के साथ नई वर्कशीट कैसे जोड़ें?

सर्वोत्तम कार्यालय उत्पादकता उपकरण

🤖 कुटूल्स एआई सहयोगी: निम्न के आधार पर डेटा विश्लेषण में क्रांति लाएं: बुद्धिमान निष्पादन   |  कोड जनरेट करें  |  कस्टम फ़ॉर्मूले बनाएं  |  डेटा का विश्लेषण करें और चार्ट बनाएं  |  कुटूल फ़ंक्शंस का आह्वान करें...
लोकप्रिय सुविधाएँ: डुप्लिकेट ढूंढें, हाइलाइट करें या पहचानें   |  रिक्त पंक्तियाँ हटाएँ   |  डेटा खोए बिना कॉलम या सेल को संयोजित करें   |   फॉर्मूला के बिना गोल ...
सुपर लुकअप: एकाधिक मानदंड VLookup    मल्टीपल वैल्यू वीलुकअप  |   अनेक शीटों में VLookup   |   फजी लुकअप ....
उन्नत ड्रॉप-डाउन सूची: शीघ्रता से ड्रॉप डाउन सूची बनाएं   |  आश्रित ड्रॉप डाउन सूची   |  बहु-चयन ड्रॉप डाउन सूची ....
स्तम्भ प्रबंधक: कॉलमों की एक विशिष्ट संख्या जोड़ें  |  कॉलम ले जाएँ  |  छिपे हुए कॉलम की दृश्यता स्थिति टॉगल करें  |  रेंज और कॉलम की तुलना करें ...
फीचर्ड फीचर्स: ग्रिड फोकस   |  डिजाइन देखें   |   बड़ा फॉर्मूला बार    कार्यपुस्तिका एवं शीट प्रबंधक   |  संसाधन लाइब्रेरी (ऑटो टेक्स्ट)   |  खजूर बीनने वाला   |  कार्यपत्रकों को संयोजित करें   |  एन्क्रिप्ट/डिक्रिप्ट सेल    सूची के अनुसार ईमेल भेजें   |  सुपर फ़िल्टर   |   विशेष फ़िल्टर (फ़िल्टर बोल्ड/इटैलिक/स्ट्राइकथ्रू...) ...
शीर्ष 15 टूलसेट12 टेक्स्ट टूल्स (पाठ जोड़ें, अक्षर हटाएँ, ...)   |   50 + चार्ट प्रकार (गैन्ट चार्ट, ...)   |   40+ प्रैक्टिकल सूत्र (जन्मदिन के आधार पर आयु की गणना करें, ...)   |   19 निवेशन टूल्स (QR कोड डालें, पथ से चित्र सम्मिलित करें, ...)   |   12 रूपांतरण टूल्स (शब्दों को संख्याएँ, मुद्रा रूपांतरण, ...)   |   7 विलय और विभाजन टूल्स (उन्नत संयोजन पंक्तियाँ, विभाजन कोशिकाओं, ...)   |   ... और अधिक

एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है।  वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...

Description


ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है

  • Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
  • नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
  • आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!
Comments (9)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
How to add bydefault table with row name and column name on sheets after creating sheets using command button. Please help.
This comment was minimized by the moderator on the site
How can the code be modified to copy a worksheet labeled "Template" and rename it to the values in the list selected in the range? I tried modifying the "worksheets.Add" code to "Worksheets("Template").Copy but it just makes copies with the worksheets labeled "Template(1)", "Template(2)", etc. Also, is there a way to put the tabs in numerical order as they are added?
This comment was minimized by the moderator on the site
Hi, Would it be possible to set-up a template for the new sheets created, instead of blank worksheets. Thanks Dave
This comment was minimized by the moderator on the site
Hi, I want to create invoices using excel and need to know whether is there a way to auto generate the second continuation page when the items on the first page exceed the A4 page layout that I have predefined? Any help is appreciated.
This comment was minimized by the moderator on the site
Could you modify the VBA code so that if the worksheet exists, it is skipped over? As it exists now, running the code a second time on the same range will create numbered worksheets. Thanks! Chris
This comment was minimized by the moderator on the site
Hello, Can I exclude blanks and automatically copy data with is behind the name? This data is generated from a pivot and I want to have all the names in different tabs with the data behind it in the layout. name1 data data data blank data data data blank Name 2 Thanks!
This comment was minimized by the moderator on the site
I need to duplicate one sheet when making all these new sheets from a list. Can you add the code for that? Thanks!
This comment was minimized by the moderator on the site
You can right click the tab and choose "move or copy" to duplicate it.
This comment was minimized by the moderator on the site
Very useful. thank you
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations