Excel में किसी फ़ोल्डर की एकाधिक फ़ाइलों का नाम कैसे बदलें?

हो सकता है कि हममें से अधिकांश लोग इस समस्या से पीड़ित हों कि हमें एक फ़ोल्डर में कई फ़ाइलों का नाम बदलने की आवश्यकता होती है, फ़ाइल नामों को एक-एक करके नाम बदलने से हम पागल हो जाएंगे यदि उस फ़ोल्डर में सैकड़ों या हजारों फ़ाइलें हैं। क्या इस कार्य से निपटने के लिए हमारे पास कोई अच्छे कार्य हैं?

एक्सेल के लिए कुटूल के साथ वर्कशीट में एक विशिष्ट फ़ोल्डर से सभी फ़ाइल नामों को सूचीबद्ध करें

एक्सेल में वीबीए कोड के साथ एक फ़ोल्डर की एकाधिक फ़ाइलों का नाम बदलें

एक्सेल के लिए कुटूल के साथ वर्कशीट में एक विशिष्ट फ़ोल्डर से सभी फ़ाइल नामों को सूचीबद्ध करें

यदि ऐसी कई फ़ाइलें हैं जिनका आप नाम बदलना चाहते हैं, तो पहले, आप पुराने फ़ाइल नामों को वर्कशीट के एक कॉलम में सूचीबद्ध कर सकते हैं, और फिर नए फ़ाइल नाम दर्ज कर सकते हैं जिन्हें आप बदलना चाहते हैं। वर्कशीट में सभी फ़ाइलों को शीघ्रता से सूचीबद्ध करने के लिए, आप इसका उपयोग कर सकते हैं एक्सेल के लिए कुटूलहै फ़ाइल नाम सूची उपयोगिता।

स्थापित करने के बाद एक्सेल के लिए कुटूल, कृपया निम्नानुसार करें :( एक्सेल के लिए अभी नि:शुल्क कुटूल डाउनलोड करें )

1। क्लिक करें कुटूल्स प्लस > आयात निर्यात > फ़ाइल नाम सूची, स्क्रीनशॉट देखें:

2. में फ़ाइल नाम सूची संवाद बॉक्स पर क्लिक करें उस फ़ाइल फ़ोल्डर को चुनने के लिए बटन जिसे आप फ़ाइलों को सूचीबद्ध करना चाहते हैं, और फिर क्लिक करें सभी फ़ाइलें से फ़ाइलें प्रकार, स्क्रीनशॉट देखें:

3। तब दबायें OK बटन, सभी फ़ाइल नामों को नई वर्कशीट के एक कॉलम में सूचीबद्ध किया गया है, साथ ही कुछ फ़ाइल विशेषताएँ भी, और अब, आप अन्य अवांछित कॉलम हटा सकते हैं और केवल छोड़ सकते हैं फ़ाइल नाम कॉलम, स्क्रीनशॉट देखें:

इस फ़ाइल नाम सूची सुविधा के बारे में अधिक जानने के लिए क्लिक करें...

एक्सेल के लिए अभी नि:शुल्क कुटूल डाउनलोड करें

एक्सेल में वीबीए कोड के साथ एक फ़ोल्डर की एकाधिक फ़ाइलों का नाम बदलें

सभी मूल फ़ाइल नामों को एक कॉलम ए में सूचीबद्ध करने के बाद, आपको कॉलम बी में नए फ़ाइल नाम टाइप करना चाहिए जैसा कि स्क्रीनशॉट में दिखाया गया है:

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

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

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

वीबीए कोड: एक फ़ोल्डर में एकाधिक फ़ाइलों का नाम बदलें

Sub RenameFiles()
'Updateby20141124
Dim xDir As String
Dim xFile As String
Dim xRow As Long
With Application.FileDialog(msoFileDialogFolderPicker)
    .AllowMultiSelect = False
If .Show = -1 Then
    xDir = .SelectedItems(1)
    xFile = Dir(xDir & Application.PathSeparator & "*")
    Do Until xFile = ""
        xRow = 0
        On Error Resume Next
        xRow = Application.Match(xFile, Range("A:A"), 0)
        If xRow > 0 Then
            Name xDir & Application.PathSeparator & xFile As _
            xDir & Application.PathSeparator & Cells(xRow, "B").Value
        End If
        xFile = Dir
    Loop
End If
End With
End Sub

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

4। और फिर क्लिक करें OK, सभी पुराने फ़ाइल नामों को तुरंत नए फ़ाइल नामों से बदल दिया गया है। स्क्रीनशॉट देखें:

टिप्पणियाँ:

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

2. उपरोक्त कोड में, reference एक: एक पुराने फ़ाइल नाम सूची को इंगित करता है जिसका आप नाम बदलना चाहते हैं, और संदर्भ B इसमें वे नए फ़ाइल नाम शामिल हैं जिनका आप उपयोग करना चाहते हैं, आप उन्हें अपनी आवश्यकता के अनुसार बदल सकते हैं

डेमो: एक्सेल में एक फ़ोल्डर की एकाधिक फ़ाइलों का नाम बदलें

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

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

एक्सेल में एकाधिक वर्कशीट का नाम कैसे बदलें?

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

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

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

अधिक पढ़ें... मुफ्त डाउनलोड...

---

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

• Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
• नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
• आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!

अधिक पढ़ें... मुफ्त डाउनलोड...