एकाधिक एक्सेल फाइलों को CSV में कैसे बदलें (3 उपयुक्त तरीके)

CSV . का पूर्ण रूप कॉमा सेपरेटेड वैल्यू है। यानी CSV . में t मान केवल अल्पविराम द्वारा अलग किए जाते हैं। यह डेटाबेस प्रबंधन में एक आवश्यक डेटा प्रारूप है। हम कई डेटा प्रबंधन परियोजनाओं में भी एक्सेल का उपयोग करते हैं। इसलिए इन दो प्रारूपों के बीच डेटा का आदान-प्रदान करना काफी सामान्य है। हालांकि हम आसानी से CSV . को रूपांतरित कर सकते हैं कई एक्सेल को CSV . में कनवर्ट करने के लिए टेक्स्ट टू कॉलम फीचर का उपयोग करके एक्सेल में फाइल को फॉर्मेट करें कोई प्रत्यक्ष विधि नहीं है जो आज तक मौजूद है। आपको VBA . का उपयोग करने की आवश्यकता है या इस उद्देश्य के लिए ऑनलाइन उपकरण। आप एकाधिक एक्सेल फ़ाइलों को CSV . में कैसे परिवर्तित कर सकते हैं यहां पर्याप्त स्पष्टीकरण के साथ चर्चा की गई है।

इन अभ्यास कार्यपुस्तिकाओं को नीचे डाउनलोड करें।

एकाधिक एक्सेल फ़ाइलों को CSV में बदलने के 3 उपयुक्त तरीके

प्रदर्शन के उद्देश्य के लिए, हम निम्नलिखित डेटा सेट का उपयोग करने जा रहे हैं, जिसे समझना काफी आसान है। हमारे पास खरीदारी की तिथि . है , क्षेत्र , उत्पाद , और मात्रा टेबल हेडर के रूप में।

एक साधारण VBA मैक्रो . का उपयोग करना एकाधिक Excel फ़ाइलों को CSV में कनवर्ट करने . के लिए समय को बहुत कम कर सकता है प्रारूप। यह विधि सीधे एक्सेल फाइलों को लोड करेगी और फिर उन्हें CSV . में बदल देगी प्रारूप फ़ाइलें।

कदम

• सबसे पहले, डेवलपर . पर जाएं टैब पर क्लिक करें, फिर विज़ुअल बेसिक . पर क्लिक करें

• फिर सम्मिलित करें पर क्लिक करें> मॉड्यूल.

• मॉड्यूल . में विंडो, निम्न कोड दर्ज करें।

Sub convert_Excel_to_csv()

Dim Con_Mul_Excel As Workbook
Dim Con_Mul_Excel_ws As Worksheet
Dim Con_Mul_Excel_path As String
Dim Con_Mul_Excel_file As String
Dim Con_Mul_Excel_fd As FileDialog
Dim Con_Mul_Excel_sfd As FileDialog
Dim Con_Mul_Excel_spath As String
Dim Con_Mul_Excel_name As String

Application.ScreenUpdating = False
Application.EnableEvents = False
Application.Calculation = xlCalculationManual

On Error Resume Next
Set Con_Mul_Excel_fd = Application.FileDialog(msoFileDialogFolderPicker)
Con_Mul_Excel_fd.AllowMultiSelect = False
Con_Mul_Excel_fd.Title = "Select the Folder for Your Excel Files"
If Con_Mul_Excel_fd.Show <> -1 Then Exit Sub
Con_Mul_Excel_path = Con_Mul_Excel_fd.SelectedItems(1) & "\"
Set Con_Mul_Excel_sfd = Application.FileDialog(msoFileDialogFolderPicker)
Con_Mul_Excel_sfd.AllowMultiSelect = False
Con_Mul_Excel_sfd.Title = "Select Destination Folder"

If Con_Mul_Excel_sfd.Show <> -1 Then Exit Sub
Con_Mul_Excel_spath = Con_Mul_Excel_sfd.SelectedItems(1) & "\"
Con_Mul_Excel_file = Dir(Con_Mul_Excel_path & "*.xls*")

Do While Con_Mul_Excel_file <> ""
Set Con_Mul_Excel = Workbooks.Open(Filename:=Con_Mul_Excel_path & Con_Mul_Excel_file)
Con_Mul_Excel_name = Con_Mul_Excel_spath & Left(Con_Mul_Excel_file, InStr(1, Con_Mul_Excel_file, ".") - 1) & ".csv"
Con_Mul_Excel.SaveAs Filename:=Con_Mul_Excel_name, FileFormat:=xlCSV
Con_Mul_Excel.Close savechanges:=False
Con_Mul_Excel_file = Dir
Loop

Application.Calculation = xlCalculationAutomatic
Application.EnableEvents = True
Application.ScreenUpdating = True

End Sub

• फिर विंडो बंद कर दें।
• उसके बाद, देखें . पर जाएं टैब> मैक्रोज़(डबल क्लिक).

• मैक्रोज़ देखें क्लिक करने के बाद, आपके द्वारा अभी बनाए गए मैक्रोज़ का चयन करें। यहाँ नाम Convert_Excel-to CSV है। फिर चलाएं . क्लिक करें

• चलाएं, . क्लिक करने के बाद आप देखेंगे कि एक नई ब्राउज़र विंडो खुल जाएगी, और उस विंडो से, आपको उस फ़ोल्डर का चयन करना होगा जहां आपकी एकाधिक एक्सेल फ़ाइलें संग्रहीत हैं, फ़ोल्डर का चयन करें और ठीक पर क्लिक करें।

• फिर एक और विंडो खुलेगी जिसमें CSV . का स्थान पूछा जाएगा फ़ाइल को एक्सेल फ़ाइलों से परिवर्तित करने के बाद। गंतव्य फ़ोल्डर का चयन करें और ठीक . क्लिक करें इसके बाद।

• इसके बाद, आप सर्कुलेटिंग लोडिंग आइकन देखेंगे। इसके बाद परिवर्तित CSV . के लिए गंतव्य फ़ोल्डर की जांच करें फ़ाइलें.
• गंतव्य फ़ोल्डर में, आप देखेंगे कि तीनों रूपांतरित CSV फ़ाइलें मौजूद हैं और उनका फ़ाइल एक्सटेंशन CSV . के रूप में दिखाई दे रहा है ।

• डेटासेट_1 पर क्लिक करें निरीक्षण के लिए।
• फ़ाइल पर क्लिक करने के बाद आप देखेंगे कि फ़ाइल खुल गई है और CSV . के रूप में दिखाई दे रही है एक्सेल फ़ाइल के बजाय फ़ाइल।
• यह पुष्टि करता है कि रूपांतरण सफल है।

• डेटासेट_2 पर क्लिक करें निरीक्षण के लिए।
• फ़ाइल पर क्लिक करने के बाद आप देखेंगे कि फ़ाइल खुल गई है और CSV . के रूप में दिखाई दे रही है एक्सेल फ़ाइल के बजाय फ़ाइल।
• यह पुष्टि करता है कि रूपांतरण सफल है।

• डेटासेट_3 पर क्लिक करें निरीक्षण के लिए।
• फ़ाइल पर क्लिक करने के बाद आप देखेंगे कि फ़ाइल खुल गई है और CSV . के रूप में दिखाई दे रही है एक्सेल फ़ाइल के बजाय फ़ाइल।
• यह पुष्टि करता है कि रूपांतरण सफल है।

और पढ़ें:एक्सेल फाइल को CSV फॉर्मेट में कैसे बदलें (5 आसान तरीके)

हम वर्कशीट के रूप में एक ही वर्कबुक में कई एक्सेल फाइलों को एक साथ मिलाने जा रहे हैं। और फिर उन कार्यपत्रकों को अलग-अलग CSV . के रूप में निर्यात करें फ़ाइलें.

कदम

• सबसे पहले, डेवलपर . पर जाएं टैब पर क्लिक करें, फिर विज़ुअल बेसिक . पर क्लिक करें .

• फिर सम्मिलित करें पर क्लिक करें> मॉड्यूल.

• मॉड्यूल . में विंडो, निम्न कोड दर्ज करें।

Sub Combine_Excel_Files()

Dim fnList, fnCurFile As Variant
Dim cFiles, cSheets As Integer
Dim wkCurSheet As Worksheet

Dim wbCurBook, wbSrcBook As Workbook

fnList = Application.GetOpenFilename(FileFilter:="Microsoft Excel Workbooks (*.xls;*.xlsx;*.xlsm),*.xls;*.xlsx;*.xlsm", Title:="Choose Excel files to merge", MultiSelect:=True)
If (vbBoolean <> VarType(fnList)) Then
If (UBound(fnList) > 0) Then
cFiles = 0
cSheets = 0
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
Set wbCurBook = ActiveWorkbook
For Each fnCurFile In fnList
cFiles = cFiles + 1
Set wbSrcBook = Workbooks.Open(Filename:=fnCurFile)
For Each wkCurSheet In wbSrcBook.Sheets
cSheets = cSheets + 1
wkCurSheet.Copy after:=wbCurBook.Sheets(wbCurBook.Sheets.Count)
Next
wbSrcBook.Close SaveChanges:=False
Next
Application.ScreenUpdating = True
Application.Calculation = xlCalculationAutomatic
MsgBox "Worked on " & cFiles & " files" & vbCrLf & "Joined " & cSheets & " worksheets", Title:="Merging Multiple Excel Files"
End If
Else
MsgBox "No File is Selected", Title:="Merging Multiple Excel files"
End If

End Sub

• फिर विंडो बंद कर दें।
• उसके बाद, देखें . पर जाएं टैब> मैक्रोज़(डबल क्लिक).

• मैक्रोज़ देखें क्लिक करने के बाद, आपके द्वारा अभी बनाए गए मैक्रोज़ का चयन करें। यहां नाम है Combine_Excel_Files . फिर चलाएं . क्लिक करें

• उसके बाद, एक नई फ़ाइल ब्राउज़र विंडो खुलेगी, और उस विंडो से, आपको उन फ़ाइलों का चयन करना होगा जिन्हें आप एकल एक्सेल फ़ाइल में मर्ज करना चाहते हैं।
• फ़ाइलें चुनें और खोलें click क्लिक करें

• खोलें clicking क्लिक करने के बाद , आप देखेंगे कि प्रत्येक शीट के लिए एक-एक करके लोडिंग स्क्रीन हैं। कुछ क्षणों के बाद, निम्न विंडो निम्न संदेश के साथ दिखाई देगी।

• फिर, आप देखेंगे कि तीन अलग-अलग एक्सेल वर्कबुक अब सक्रिय एक्सेल वर्कबुक में अलग-अलग वर्कशीट के रूप में लोड हो गई हैं।

• अगला, डेवलपर . पर जाएं टैब पर क्लिक करें, फिर विज़ुअल बेसिक . पर क्लिक करें .

• फिर सम्मिलित करें पर क्लिक करें> मॉड्यूल.

• मॉड्यूल . में विंडो, निम्न कोड दर्ज करें।

Sub Excel_TO_CSV()

Dim wrsh As Worksheet
Dim excsv As String

For Each wrsh In Application.ActiveWorkbook.Worksheets
wrsh.Copy
excsv = CurDir & "\" & wrsh.Name & ".csv"
Application.ActiveWorkbook.SaveAs Filename:=excsv, _
FileFormat:=xlCSV, CreateBackup:=False
Application.ActiveWorkbook.Saved = True
Application.ActiveWorkbook.Close
Next

End Sub

• फिर विंडो बंद कर दें।
• उसके बाद, देखें . पर जाएं टैब> मैक्रोज़(डबल क्लिक).

• मैक्रोज़ देखें क्लिक करने के बाद, आपके द्वारा अभी बनाए गए मैक्रोज़ का चयन करें। यहां नाम है Excel_TO_CSV . फिर चलाएं . क्लिक करें

• चलाएं क्लिक करने के बाद, वर्कशीट में लोडिंग चरण के क्षण होंगे।
• फिर आपको अपने कंप्यूटर पर फ़ाइल दस्तावेज़ फ़ोल्डर की आवश्यकता है। इस निर्देशिका में, आप परिवर्तित CSV . देखने जा रहे हैं फ़ाइलें.
• आप देखेंगे कि इन फ़ाइलों के फ़ाइल एक्सटेंशन CSV . में दिखाई दे रहे हैं प्रारूप।

• खोलें डेटासेट_1 , तब आप देखेंगे कि फ़ाइल CSV . में है प्रारूप और एक्सेल वर्कशीट से कनवर्ट किया गया है।

और पढ़ें:बिना खोले एक्सेल को CSV में कैसे बदलें (4 आसान तरीके)

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

कदम

• X पर जाएं LSX (EXCEL) से CSV (ऑनलाइन और नि:शुल्क) — Convertio . कई एक्सेल शीट को CSV . में बदलने के लिए यह एक बहुत अच्छा ऑनलाइन कनवर्टर है प्रारूप।
• फ़ाइलों के इनपुट स्वरूप और आउटपुट स्वरूप का चयन करें। यहां इनपुट प्रारूप XLSX होगा , फिर आउटपुट स्वरूप CSV select चुनें ।
• अगला, वेबसाइट पर फाइलें चुनें पर क्लिक करें। आइकन।

• एक फ़ाइल ब्राउज़ मेनू खुलेगा, उस मेनू से उन फ़ाइलों का चयन करें जिन्हें परिवर्तित करने की आवश्यकता है और खोलें क्लिक करें . इस मामले में, हमने डेटासेट_1 . चुना है , डैटसेट_2 , डेटासेट_3.

• इन तीनों को अब वेबसाइट पर अपलोड कर दिया जाएगा, और उनका गंतव्य प्रारूप CSV दिखाएगा रूपांतरित करें Click क्लिक करें इसके बाद।

• रूपांतरित करें क्लिक करने के बाद , रूपांतरण प्रक्रिया शुरू हो जाएगी।
• फिर डाउनलोड करें click क्लिक करें कनवर्ट की गई फ़ाइलों को डाउनलोड करने के लिए प्रत्येक फ़ाइल के दाईं ओर।

<मजबूत>

• डाउनलोड पूरा होने के बाद, डाउनलोड फ़ोल्डर खोलें और ध्यान दें कि सभी एक्सेल फाइलें अब CSV में कनवर्ट हो गई हैं। प्रारूप।

• खोलें डेटासेट_1 निरीक्षण के लिए।
• ध्यान दें कि फ़ाइल अब CSV . के रूप में खुली है फ़ाइल। इसका मतलब है कि रूपांतरण सफल है।

और पढ़ें:Excel फ़ाइलों को स्वचालित रूप से CSV में कैसे बदलें (3 आसान तरीके)

निष्कर्ष

इसे सारांशित करने के लिए, प्रश्न "एकाधिक एक्सेल फ़ाइलों को CSV में कैसे परिवर्तित करें ” का उत्तर यहां 3 अलग-अलग तरीकों से दिया गया है। हमने 2 अलग VBA . का उपयोग किया दृष्टिकोण और एक ऑनलाइन कनवर्टर विधि। यहां उपयोग की जाने वाली सभी विधियों में, ऑनलाइन रूपांतरण पद्धति का उपयोग करना सबसे आसान और समय बचाने वाला है। वीबीए प्रक्रिया भी कम समय लेने वाली है लेकिन इसके लिए पहले VBA . की आवश्यकता होती है -संबंधित ज्ञान। ऑनलाइन पद्धति में ऐसी कोई आवश्यकता नहीं है।

इस समस्या के लिए, एक मैक्रो-सक्षम कार्यपुस्तिका संलग्न है जहाँ आप इन विधियों का अभ्यास कर सकते हैं।

टिप्पणी अनुभाग के माध्यम से कोई भी प्रश्न या प्रतिक्रिया पूछने के लिए स्वतंत्र महसूस करें। ExcelDemy . की बेहतरी के लिए कोई सुझाव समुदाय अत्यधिक प्रशंसनीय होगा।

संबंधित लेख

• एक्सेल को पाइप सीमांकित टेक्स्ट फ़ाइल में कनवर्ट करने के लिए मैक्रो (3 तरीके)
• एक्सेल फ़ाइल को कॉमा सीमांकित (3 तरीके) के साथ टेक्स्ट फ़ाइल में कैसे बदलें
• एक्सेल को दोहरे उद्धरण चिह्नों के साथ CSV के रूप में सहेजें (3 सरलतम तरीके)
• [फिक्स्ड!] एक्सेल सीएसवी को कॉमा के साथ नहीं सहेज रहा है (7 संभावित समाधान)
• एक्सेल को कॉमा सीमांकित CSV फ़ाइल में बदलें (2 आसान तरीके)