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

एक्सेल में सेल वैल्यू (सूची से) के आधार पर शीट का नाम कैसे बदलें?

लेखक: केली अंतिम संशोधित: 2023-11-17

एक्सेल में एकल वर्कशीट का नाम बदलना आम तौर पर शीट के टैब पर राइट-क्लिक करके और संदर्भ मेनू से "नाम बदलें" चुनकर किया जाता है। हालाँकि, यदि आपको निर्दिष्ट कक्षों के मानों का उपयोग करके एकाधिक कार्यपत्रकों का नाम बदलने की आवश्यकता है, या किसी विशिष्ट कक्ष के मान के आधार पर किसी कार्यपत्रक को गतिशील रूप से नाम देना चाहते हैं, तो कई विधियाँ हैं जिनका आप उपयोग कर सकते हैं। यह लेख इन तकनीकों के माध्यम से आपका मार्गदर्शन करेगा, जिससे प्रक्रिया सीधी और कुशल हो जाएगी।


VBA के साथ सेल मान से एक शीट का गतिशील रूप से नाम बदलें

हम एक्सेल में वीबीए के साथ एक निश्चित सेल के मान से वर्कशीट का गतिशील रूप से नाम बदल सकते हैं, और आप निम्नानुसार कर सकते हैं:

चरण १: वर्कशीट के शीट नाम पर राइट क्लिक करें जिसे आप सेल वैल्यू द्वारा गतिशील रूप से नाम देंगे, और चयन करें कोड देखें राइट-क्लिक मेनू से।

चरण १: उद्घाटन में अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक विंडो, मॉड्यूल विंडो में निम्नलिखित VBA कोड चिपकाएँ।

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Set Target = Range("A1")
If Target = "" Then Exit Sub
Application.ActiveSheet.Name = VBA.Left(Target, 31)
Exit Sub
End Sub

सुझाव: यह VBA गतिशील रूप से सेल A1 में मान के आधार पर वर्कशीट का नाम बदलता है, आप अपनी आवश्यकताओं के आधार पर "A1" को अन्य सेल में बदल सकते हैं।

चरण १: VBA कोड सहेजें और बंद करें अनुप्रयोग के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.

फिर आप देखेंगे कि निर्दिष्ट सेल मान के आधार पर शीट का नाम गतिशील रूप से बदल गया है।

टिप्पणियाँ:

  • यदि निर्दिष्ट सेल रिक्त है, तो वर्कशीट का नाम नहीं बदला जाएगा।
  • हर बार जब आप निर्दिष्ट सेल में मान बदलते हैं तो वर्कशीट का नाम बदल दिया जाएगा।
  • यदि आप निर्दिष्ट सेल में विशेष वर्ण टाइप करते हैं, जैसे *, तो एक त्रुटि चेतावनी पॉप अप हो जाएगी।

संबंधित शीट में सेल मानों के आधार पर एकाधिक शीट का नाम बदलें

ऊपर वर्णित विधि एक समय में एक शीट का नाम बदलने की अनुमति देती है। हालाँकि, का उपयोग करके एकाधिक कार्यपत्रकों का नाम बदलें का लक्षण एक्सेल के लिए कुटूल, आप प्रत्येक संगत शीट में निर्दिष्ट सेल के मान के आधार पर सभी या एकाधिक शीटों का तेजी से नाम बदल सकते हैं। उदाहरण के लिए, आप उस विशेष शीट के सेल A1 में पाए गए मान से मिलान करने के लिए प्रत्येक शीट का नाम बदल सकते हैं।

एक्सेल के लिए कुटूल - एक्सेल के लिए 300 से अधिक आवश्यक उपकरणों से भरा हुआ। बिना किसी क्रेडिट कार्ड की आवश्यकता के पूर्ण-विशेषताओं वाले 30-दिवसीय निःशुल्क परीक्षण का आनंद लें! अभी डाउनलोड करो!

  1. क्लिक करें कुटूल्स प्लस > वर्कशीट > वर्कशीट का नाम बदलें. स्क्रीनशॉट देखें:
  2. उद्घाटन में एकाधिक कार्यपत्रकों का नाम बदलें संवाद बॉक्स, कृपया निम्नानुसार करें:
    1. में कार्यपत्रक सूची, उन कार्यपत्रकों की जाँच करें जिनका आप नाम बदलेंगे।
    2. में नाम बदलें विकल्प अनुभाग, जांचें मूल शीट का नाम बदलें विकल्प.
    3. में नई वर्कशीट का नाम अनुभाग, कृपया जाँच करें विशिष्ट सेल के साथ कार्यपत्रकों का नाम बदलें विकल्प, और उस सेल को निर्दिष्ट करें जिसकी सामग्री से आप संबंधित शीट का नाम बदलेंगे।
    4. दबाएं Ok बटन.

और अब सभी चेक की गई शीटों का नाम प्रत्येक शीट के निर्दिष्ट सेल के आधार पर बदल दिया गया है। स्क्रीनशॉट देखें:

नोट: तक पहुँचना चाहते हैं एकाधिक कार्यपत्रकों का नाम बदलें विशेषता? डाउनलोड करना एक्सेल के लिए कुटूल अब! इसके अलावा, कुटूल्स असंख्य 300+ अन्य सुविधाओं का दावा करता है और 30 दिन का निःशुल्क परीक्षण प्रदान करता है। इंतज़ार न करें, इसे आज ही आज़माएँ!


निर्दिष्ट सूची से एकाधिक शीट का नाम बदलें

एक्सेल के लिए कुटूल एकाधिक कार्यपत्रकों का नाम बदलें यह सुविधा एक निर्दिष्ट सूची में सेल मानों के आधार पर एकाधिक शीटों का नाम बदलने का भी समर्थन करती है।

एक्सेल के लिए कुटूल - एक्सेल के लिए 300 से अधिक आवश्यक उपकरणों से भरा हुआ। बिना किसी क्रेडिट कार्ड की आवश्यकता के पूर्ण-विशेषताओं वाले 30-दिवसीय निःशुल्क परीक्षण का आनंद लें! अभी डाउनलोड करो!

  1. क्लिक करें कुटूल्स प्लस > वर्कशीट > वर्कशीट का नाम बदलें.
  2. उद्घाटन में एकाधिक कार्यपत्रकों का नाम बदलें संवाद बॉक्स, निम्नानुसार कॉन्फ़िगर करें:
    1. में कार्यपत्रक सूची, उन कार्यपत्रकों का चयन करें जिनका आप नाम बदलेंगे।
    2. में नाम बदलें विकल्प अनुभाग, जांचें मूल शीट का नाम बदलें विकल्प.
    3. में नई वर्कशीट का नाम अनुभाग, जांचें विशिष्ट श्रेणी से विकल्प, और क्लिक करें  दूसरा खोलने के लिए बटन एकाधिक कार्यपत्रकों का नाम बदलें संवाद बॉक्स (दायाँ स्क्रीनशॉट देखें)। फिर, उन कक्षों की सूची चुनें जिनका आप उनके मानों के आधार पर नाम बदलेंगे, और क्लिक करें OK बटन.
    4. दबाएं Ok नाम बदलने को लागू करने के लिए बटन.

फिर आप देखेंगे कि सभी चेक की गई वर्कशीट के नाम निर्दिष्ट सूची में सेल मानों से बदल दिए गए हैं। नीचे स्क्रीनशॉट देखें:

नोट: तक पहुँचना चाहते हैं एकाधिक कार्यपत्रकों का नाम बदलें विशेषता? डाउनलोड करना एक्सेल के लिए कुटूल अब! इसके अलावा, कुटूल्स असंख्य 300+ अन्य सुविधाओं का दावा करता है और 30 दिन का निःशुल्क परीक्षण प्रदान करता है। इंतज़ार न करें, इसे आज ही आज़माएँ!


डेमो: एक्सेल में सेल मानों (सूची से) के आधार पर नाम पत्रक


एक्सेल के लिए कुटूल: आपकी उंगलियों पर 300 से अधिक उपयोगी उपकरण! आज ही बिना किसी सुविधा सीमा के अपना 30-दिवसीय निःशुल्क परीक्षण प्रारंभ करें। अब डाउनलोड करें!

संबंधित आलेख:

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

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

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

Description


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

  • Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
  • नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
  • आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!
Comments (7)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hi there, one question if i want to use the value of 2 cells (A1 & B1) what i have to change?
This comment was minimized by the moderator on the site
Hi there,

Please try the code below:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Dim sheetName As String
    
    If Not Intersect(Target, Me.Range("A1:B1")) Is Nothing Then
        sheetName = VBA.Left(Me.Range("A1").Value & Me.Range("B1").Value, 31)
        
        If sheetName <> "" Then
            Application.ActiveSheet.Name = sheetName
        End If
    End If
End Sub

Once you done pasting the code to the View Code window, please select the cell A1 or B1 to make the code run.

Amanda
This comment was minimized by the moderator on the site
Здравствуйте! Подскажите, пожалуйста, а как в Excel создать левую панель, в которой разместить названия листов? То есть перенести ярлыки листов влево (сейчас то они снизу)
This comment was minimized by the moderator on the site
This comment was minimized by the moderator on the site
I used the dynamic sheet name coding and functionally it works well, but I get the Runtime Error 1004 whenever I click inside a cell. Anyone have any info on how to correct this?


Thanks
This comment was minimized by the moderator on the site
This is awesome, thank you so much....
This comment was minimized by the moderator on the site
so I am trying to do this, but nothing is happening - my sheet names aren't changing, everything is the exact same. Do you know what I am doing wrong??
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations