एक्सेल फ़ाइल को सेल वैल्यू के साथ कैसे सेव करें?
जब आप किसी कार्यपुस्तिका का उपयोग करते हैं, तो क्या आपने कभी सेल सामग्री के आधार पर एक्सेल फ़ाइल को सहेजने के बारे में सोचा है? उदाहरण के लिए, आपके पास सेल A1 में "बिक्री मूल्य" है, और आप कार्यपुस्तिका को बिक्री मूल्य के नाम से सहेजना चाहेंगे। बेशक, आप इस रूप में सहेजें संवाद में नाम टाइप कर सकते हैं और फिर इसे सहेज सकते हैं। लेकिन आपके काम के दायरे में यह एक अप्रभावी तरीका होगा। आज मैं इसे हल करने की एक त्वरित ट्रिक के बारे में बात करूंगा।
VBA कोड का उपयोग करके एक्सेल फ़ाइल को विशिष्ट सेल मान के साथ सहेजें
VBA कोड का उपयोग करके एक्सेल फ़ाइल को विशिष्ट सेल मान के साथ सहेजें
निम्नलिखित VBA कोड आपकी कार्यपुस्तिका को निर्दिष्ट सेल मान के साथ सहेजने में आपकी सहायता कर सकता है, कृपया निम्नानुसार कार्य करें:
1. दबाए रखें ALT + F11 कुंजी को खोलने के लिए एप्लीकेशन विंडो के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक.
2। क्लिक करें सम्मिलित करें > मॉड्यूल, और निम्नलिखित कोड को इसमें पेस्ट करें मॉड्यूल विंडो.
वीबीए कोड: एक्सेल फ़ाइल को विशिष्ट सेल मान के साथ सहेजें
Private Sub filename_cellvalue()
'Update 20141112
Dim Path As String
Dim filename As String
Path = "C:\Users\dt\Desktop\my information\"
filename = Range("A1")
ActiveWorkbook.SaveAs filename:=Path & filename & ".xls", FileFormat:=xlNormal
End Sub
3. और फिर दबाएं F5 कोड निष्पादित करने के लिए कुंजी, और आपकी कार्यपुस्तिका को सेल A1 की सेल सामग्री के रूप में नामित किया गया है। स्क्रीनशॉट देखें:
टिप्पणियाँ:
1. आप उपरोक्त कोड में A1 को अन्य सेल संदर्भ में संशोधित करके किसी भी सेल मान को फ़ाइल नाम के रूप में निर्दिष्ट कर सकते हैं।
2. आपकी सक्रिय कार्यपुस्तिका के फ़ोल्डर में सहेजी जाएगी C:\उपयोगकर्ता\dt\डेस्कटॉप\मेरी जानकारी\ (जब आप इसके स्थान पर अपना स्थान चिपकाते हैं तो अंतिम स्लैश बना रहना चाहिए) स्थान, आप अपनी आवश्यकता के अनुसार पथ बदल सकते हैं।
संबंधित आलेख:
Excel में दिनांक और समय के साथ फ़ाइल कैसे सहेजें?
Excel में टाइटल बार या टूलबार में फ़ाइल पथ कैसे दिखाएं?
सर्वोत्तम कार्यालय उत्पादकता उपकरण
एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है। वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...
ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है
- Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
- नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
- आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!