यह आलेख बताता है कि कैसे पाठ फ़ाइल डेटा आयात करें एकाधिक सीमांकक . के साथ एक एक्सेल वर्कशीट . में 3 अलग-अलग तरीकों का उपयोग करना। हम कार्य को पूरा करने के लिए एक्सेल की अंतर्निहित सुविधाओं और वीबीए कोड का उपयोग करेंगे। आइए विधियों की स्पष्ट समझ प्राप्त करने के लिए उदाहरणों में गोता लगाएँ।
3 एक्सेल में एकाधिक सीमांकक वाली टेक्स्ट फ़ाइल आयात करने के लिए उपयुक्त तरीके
मान लें कि हमारे पास एकाधिक सीमांकक . के साथ एक डेटासेट है एक पाठ फ़ाइल . में . डेटासेट पाठ्य फ़ाइल . में ऐसा दिखता है-
डेटासेट बिक्री विवरण . का प्रतिनिधित्व करता है एक दुकान के लिए। आप डाउनलोड कर सकते हैं पाठ फ़ाइल अभ्यास . के लिए लिंक . से . यहां, प्रत्येक डेटा . का अलग . है या तो अल्पविराम . द्वारा या एक अर्धविराम . हम आयात करना चाहते हैं यह डेटा पाठ्य फ़ाइल . से एक एक्सेल स्प्रेडशीट . पर ।
1. लीगेसी विजार्ड्स सुविधा का उपयोग करके एकाधिक सीमांकक के साथ टेक्स्ट फ़ाइल डेटा आयात करें
विरासत विज़ार्ड की विशेषता पाठ फ़ाइलें आयात करने के लिए वांछित संरचना . सेट करने के लिए हमें विकल्पों का एक समूह प्रदान करता है आयातित डेटासेट . के एक्सेल वर्कशीट . में ।
विरासत विज़ार्ड पर जाएं
- जाएं डेटा टैब . पर एक्सेल रिबन . से ।
- क्लिक करें डेटा प्राप्त करें . पर विकल्प।
- होवर करें विरासत विज़ार्ड . पर माउस विकल्प।
- चुनें पाठ्य से (विरासत) विकल्प.
यदि पाठ से (विरासत) विकल्प उपलब्ध नहीं है
मामले में टेक्स्ट से (विरासत) विकल्प उपलब्ध नहीं है लीगेसी विजार्ड्स विकल्पों में, सक्षम . के लिए निम्न कार्य करें यह।
- प्रेस Alt + T + O कीबोर्ड . पर एक्सेल विकल्प खोलने के लिए।
- क्लिक करें डेटा . पर टैब।
- जांचें बॉक्स नाम “पाठ से (विरासत)” "विरासत डेटा आयात विज़ार्ड दिखाएं . के अंतर्गत "विकल्प।
- आखिरकार हिट करें ठीक है सेटिंग्स को बचाने के लिए।
पाठ्य फ़ाइल आयात करें
जैसा कि हमने क्लिक किया पाठ्य से . पर (विरासत ) विरासत विज़ार्ड . से विकल्प , यह खोला “आयात टेक्स्ट फ़ाइल " विंडो चुनने के लिए पाठ्य फ़ाइल . नेविगेट करें फ़ाइल स्थान . पर और चुनें आयात करने के लिए यह।
सेटिंग कॉन्फ़िगर करें
3 में से पहला चरण
- सीमांकित का चयन करें विकल्प।
- “मेरे डेटा में शीर्षलेख हैं” चेक करें विकल्प, नमूना डेटासेट के रूप में, हम एक हेडर . का उपयोग कर रहे हैं ।
- क्लिक करें अगला बटन।
3 में से चरण 2
- जांचें अर्धविराम और अल्पविराम सीमांकक . के अंतर्गत विकल्प विकल्प।
नोट :हमारा डेटासेट ये हैं दो सीमांकक कुछ और विकल्प हैं "अन्य . सहित सीमांकक . के लिए विकल्प जो उपलब्ध नहीं हैं सूची . में ।
- इसके अलावा, चेक करें "लगातार सीमांकक को एक मानें "विकल्प।
- क्लिक करें अगला बटन।
चरण 3 का 3:
- डिफ़ॉल्ट रूप से, कॉलम डेटा प्रारूप सामान्य है . इस उदाहरण में, हम इसे वैसे ही छोड़ देंगे।
- आखिरकार समाप्त करें दबाएं बटन।
<मजबूत>
लक्ष्य चुनें
उपरोक्त सभी चरणों के बाद, कहां चुनें डालने के लिए आपका आयातित डेटा . यहां, हमने सेल A1 . चुना है वर्तमान कार्यपत्रक . में ।
आयातित डेटासेट
<मजबूत>
और पढ़ें: किसी अन्य एक्सेल फ़ाइल से एक्सेल में डेटा कैसे आयात करें (2 तरीके)
2. डेटा प्राप्त करें और रूपांतरित करें सुविधा का उपयोग करके एकाधिक सीमांकक के साथ टेक्स्ट फ़ाइल डेटा तैयार करें और फिर आयात करें
इस उदाहरण में, हम एक्सेल की प्राप्त और डेटा सुविधा को रूपांतरित करें . का उपयोग करेंगे आयात करने के लिए एकाधिक सीमांकक . के साथ डेटा टेक्स्ट फ़ाइल से एक्सेल वर्कशीट . में . लेकिन इस बार हमें तैयार . करने की आवश्यकता है डेटा आयात करने . से पहले इसे एक्सेल के लिए।
डेटासेट तैयार करें
हमें एकाधिक सीमांकक कम करने . की आवश्यकता है एक सीमांकक . तक कार्य करने के लिए प्राप्त करें और रूपांतरित करें . के साथ विशेषता। हमारे डेटासेट के लिए, हमें प्रतिस्थापित करने की आवश्यकता है सभी अर्धविराम अल्पविराम . के साथ . ऐसा करने के लिए, हमने निम्नलिखित किया है।
- बनाया गया एक प्रतिलिपि मूल पाठ . का SampleDataModified. . नाम की फ़ाइल txt.
- खोला गया फ़ाइल और Ctrl + H. दबाया
- विंडो बदलें . में अर्धविराम लगाएं “क्या खोजें” . में इनपुट बॉक्स और अल्पविराम "बदलें . में साथ "इनपुट बॉक्स।
- सभी को बदलें . पर क्लिक करें बटन।
- अब हमारे पास केवल अल्पविराम हैं सीमांकक . के रूप में हमारे डेटासेट . में ।
पाठ्य फ़ाइल आयात करें
आयात . के लिए सरल चरणों का पालन करें संशोधित पाठ फ़ाइल प्राप्त करें . का उपयोग करके और रूपांतरित करें सुविधा एक्सेल में।
- जाएं डेटा . के लिए टैब।
- क्लिक करें डेटा प्राप्त करें . पर बटन।
- होवर करें फ़ाइल से . पर विकल्प।
- क्लिक करें पाठ्य/सीएसवी से . पर विकल्प.
- नेविगेट करें फ़ाइल स्थान . पर SampleTextModified . में से .txt और चुनें फ़ाइल को आयात . करने के लिए ।
- पूर्वावलोकन में, डेटासेट तालिका . के रूप में दिखाया गया है ।
- क्लिक करें लोड . पर बटन।
आयातित डेटासेट
और पढ़ें: टेक्स्ट फ़ाइल से एक्सेल में डेटा कैसे आयात करें (3 तरीके)
समान रीडिंग
- VBA का उपयोग करके स्वचालित रूप से Excel से Word में डेटा आयात करें (2 तरीके)
- एक्सेल फॉर्मूला (5 तरीके) का उपयोग करके किसी सूची से डेटा कैसे निकालें
- एक्सेल मैक्रो:एकाधिक एक्सेल फाइलों से डेटा निकालें (4 तरीके)
- Excel में दिनांक से वर्ष कैसे निकालें (3 तरीके)
- Excel में दिनांक से माह कैसे निकालें (5 त्वरित तरीके)
3. एक्सेल वर्कशीट में एकाधिक सीमांकक के साथ टेक्स्ट फ़ाइल डेटा आयात करने के लिए VBA कोड चलाएँ
हम VBA स्प्लिट . का उपयोग करने जा रहे हैं और InStr फ़ंक्शन VBA कोड को पाठ फ़ाइलों को आयात करने . के लिए कॉन्फ़िगर करने के लिए एक एक्सेल वर्कशीट . पर . आइए परिचय . करें कार्य पहले।
VBA स्प्लिट फंक्शन: विभाजन समारोह एक्सेल में VBA विभाजित . के लिए प्रयोग किया जाता है एक स्ट्रिंग सबस्ट्रिंग . में . फ़ंक्शन एक शून्य-आधारित एक-आयामी सरणी देता है . प्रत्येक तत्व सरणी . के एक सबस्ट्रिंग . है एक पूर्वनिर्धारित सीमांकक . द्वारा अलग किया गया . VBA फ़ंक्शन . का सिंटैक्स है-
विभाजन(अभिव्यक्ति, [सीमांकक, [सीमा, [तुलना]]])
यहां,
अभिव्यक्ति - यह आवश्यक पैरामीटर एक टेक्स्ट स्ट्रिंग . का प्रतिनिधित्व करता है जिसमें सबस्ट्रिंग . है और सीमांकक . अगर स्ट्रिंग खाली है , फ़ंक्शन वापस भी होगा एक खाली सरणी ।
सीमांकक - एक स्ट्रिंग वर्ण जिसका उपयोग विभाजित . के लिए किया जाता है स्ट्रिंग सबस्ट्रिंग . में . यदि छोड़ा गया तो फ़ंक्शन स्पेस कैरेक्टर . का उपयोग करेगा सीमांकक . के रूप में . और अगर यह एक खाली स्ट्रिंग . है , यह मूल स्ट्रिंग . लौटाएगा आउटपुट . के रूप में ।
सीमा - यह संख्या . का प्रतिनिधित्व करता है सबस्ट्रिंग . के आउटपुट . में लौटने के लिए . यदि छोड़ा गया है, तो फ़ंक्शन सभी को वापस कर देगा सबस्ट्रिंग ।
तुलना करें - इसमें कई . हैं मान . हम vbBinaryCompare . का उपयोग कर सकते हैं मामले . के लिए –संवेदनशील सीमांकक और vbTextCompare केस-असंवेदनशील सीमांकक . के लिए स्प्लिट फंक्शन में।
VBA InStr फंक्शन: हम InStr फ़ंक्शन . का उपयोग करते हैं एक्सेल VBA में खोज . करने के लिए एक विशिष्ट स्ट्रिंग एक दी गई स्ट्रिंग . के भीतर पूर्वनिर्धारित स्थिति . से . वाक्यविन्यास है-
InStr([शुरू], स्ट्रिंग 1, स्ट्रिंग 2, [तुलना करें] )
यहां,
[शुरू करें ]- स्थिति जिससे वह खोजना शुरू करता है . डिफ़ॉल्ट 1 . है अगर छोड़े गए .
स्ट्रिंग 1- दी गई स्ट्रिंग जिससे फ़ंक्शन खोज वांछित स्ट्रिंग . के लिए .
स्ट्रिंग 2- विशिष्ट स्ट्रिंग कि फ़ंक्शन खोज दिए गए स्ट्रिंग के भीतर।
[तुलना करें ]- प्रकार की तुलना . डिफ़ॉल्ट बाइनरी तुलना . है ।
एक्सेल वर्कशीट में एकाधिक सीमांकक के साथ टेक्स्ट फ़ाइल डेटा आयात करने के लिए , हमें खोलना . चाहिए और VBA कोड लिखें विजुअल बेसिक एडिटर में। चरणों . का पालन करें खोलने . के लिए दृश्य मूल संपादक और वहां कुछ कोड लिखें।
- डेवलपर पर जाएं एक्सेल रिबन . से टैब ।
- क्लिक करें विजुअल बेसिक विकल्प।
- अनुप्रयोगों के लिए Visual Basic में विंडो में, ड्रॉपडाउन सम्मिलित करें . क्लिक करें चुनने के लिए नया मॉड्यूल विकल्प।
अब अपना कोड डालें विज़ुअल कोड संपादक . के अंदर और F5 दबाएं चलाने के लिए यह। निम्नलिखित कोड बदला गया अर्धविराम पाठ्य फ़ाइल . का अल्पविराम . के साथ VBA बदलें फ़ंक्शन का उपयोग करके .
Sub ImportTextFileDatatoExcel()
Dim fileLocation As String, textData As String
Dim rowNum As Long
folderLocation = "D:\Exceldemy"
Set fso = CreateObject("Scripting.FileSystemObject")
Set folder = fso.GetFolder(folderLocation)
rowNum = 1
Close #1
For Each textFile In folder.Files
fileLocation = folder & "\" & textFile.Name
Open fileLocation For Input As #1
Do While Not EOF(1)
Line Input #1, textData
textData = Replace(textData, ";", ",")
If InStr(textData, ",") = 0 Then
Cells(rowNum, 1) = textData
Else
tArray = Split(textData, ",")
nColumn = 1
For Each element In tArray
Cells(rowNum, nColumn) = element
nColumn = nColumn + 1
Next element
End If
rowNum = rowNum + 1
Loop
Close #1
Next textFile
End Sub
उपरोक्त कोड में, अपना स्वयं का फ़ोल्डर स्थान . डालें जो धारण करता है पाठ्य फ़ाइल कोड में। निम्नलिखित स्क्रीनशॉट फ़ाइल स्थान . दिखाता है इसके लिए चित्रण ।
आयातित डेटासेट
और पढ़ें:डिलीमीटर के साथ एक्सेल को टेक्स्ट फाइल में बदलें (2 आसान तरीके)
नोट
- हमारे द्वारा उपयोग किया गया VBA कोड काम . कर सकता है एकाधिक . के साथ पाठ फ़ाइलें नियत . में फ़ोल्डर कुशलता से।
- यदि निर्दिष्ट सीमांकक मौजूद नहीं है स्रोत स्ट्रिंग . में , विभाजन फ़ंक्शन स्ट्रिंग को वैसे ही लौटा देगा जैसा वह है .
- यदि तर्क की तुलना करें विभाजन . के फ़ंक्शन छोड़ा गया . है , डिफ़ॉल्ट मान vbBinaryCompare है।
- InStrRev फ़ंक्शन रिटर्न 0 अगर सबस्ट्रिंग दी गई स्ट्रिंग . में मौजूद नहीं है .
निष्कर्ष
अब, हम जानते हैं कि एक्सेल में टेक्स्ट फ़ाइल डेटा को एक्सेल में कई डिलीमीटर के साथ उपयुक्त उदाहरणों की मदद से कैसे आयात किया जाए। उम्मीद है, यह आपको अधिक आत्मविश्वास से कार्यक्षमता का उपयोग करने में मदद करेगा। कोई भी प्रश्न या सुझाव उन्हें नीचे दिए गए कमेंट बॉक्स में डालना न भूलें।
संबंधित लेख
- Excel में फ़िल्टर किए गए डेटा को दूसरी शीट (4 तरीके) में निकालें
- एक्सेल शीट से डेटा कैसे निकालें (6 प्रभावी तरीके)
- इमेज से एक्सेल में डेटा एक्सट्रेक्ट करें (त्वरित चरणों के साथ)
- कॉलम के साथ नोटपैड को एक्सेल में कैसे बदलें (5 तरीके)
- Excel VBA:किसी वेबसाइट से डेटा स्वचालित रूप से प्राप्त करें (2 तरीके)
- टेक्स्ट फ़ाइल को एक्सेल में बदलने के लिए VBA कोड (7 तरीके)