Μετατρέψτε το CSV σε Excel (XLS ή XLSX) χρησιμοποιώντας τη γραμμή εντολών στα Windows

Ακολουθεί ένα σεμινάριο για τη μετατροπή CSV σε XLS ή XLSX χρησιμοποιώντας τη διεπαφή γραμμής (convert CSV to XLS or XLSX using the command-line) εντολών(interface) στα Windows 11/10 . Υπάρχουν πολλοί τρόποι μετατροπής ενός αρχείου CSV σε μορφές Excel ( XLS , XLSX ). Μπορείτε να χρησιμοποιήσετε το Microsoft Excel(Microsoft Excel) , ένα αποκλειστικό δωρεάν λογισμικό μετατροπέα ή ένα διαδικτυακό εργαλείο για να πραγματοποιήσετε τη μετατροπή. Όμως, ξέρατε ότι μπορείτε επίσης να χρησιμοποιήσετε τη διεπαφή γραμμής εντολών των Windows για να μετατρέψετε το (Windows)CVS σε Excel ; Και, δεν χρειάζεστε καν κάποιο εργαλείο τρίτων για αυτό; Εάν όχι, αυτό το σεμινάριο θα σας εκπλήξει ευχάριστα.

Σε αυτό το άρθρο, θα σας δείξουμε πώς μπορείτε να μετατρέψετε ένα αρχείο CSV(CSV) σε βιβλίο εργασίας του Excel . Για αυτό, θα χρησιμοποιήσουμε ένα VBScript . Ας δούμε το σενάριο και τα βήματα που χρειάζεστε για τη μετατροπή.

Πώς να μετατρέψετε το CSV σε Excel χρησιμοποιώντας τη γραμμή εντολών(Command)

Ακολουθούν τα βήματα για τη μετατροπή CSV σε Excel χρησιμοποιώντας τη διεπαφή γραμμής εντολών(Command Line Interface) στα Windows 11 ή Windows 10:

  1. Ανοίξτε το Σημειωματάριο.
  2. Γράψτε ένα σενάριο της Visual Basic (VBS).
  3. Αποθηκεύστε το αρχείο VBS.
  4. Ανοίξτε τη γραμμή εντολών στο φάκελο.
  5. Εισαγάγετε(Enter) την εντολή μετατροπής CSV σε Excel .

Ας συζητήσουμε αυτά τα βήματα λεπτομερώς!

Αρχικά, ανοίξτε την εφαρμογή Σημειωματάριο(Notepad) στον υπολογιστή σας με Windows 10. Τώρα πρέπει να γράψετε ένα VBScript με σχετικές εντολές. Παρακάτω(Below) είναι το πλήρες σενάριο που πρέπει να εισαγάγετε στο Σημειωματάριο(Notepad) . απλώς αντιγράψτε από εδώ και επικολλήστε το στο Σημειωματάριο(Notepad) σας :

'======================================
' Convert CSV to Excel
'
' arg1: source - CSV path\file
' arg2: target - Excel path\file
'======================================

srccsvfile = Wscript.Arguments(0) 
tgtxlsfile = Wscript.Arguments(1)

'Create Spreadsheet
'Look for an existing Excel instance.
On Error Resume Next ' Turn on the error handling flag
Set objExcel = GetObject(,"Excel.Application")
'If not found, create a new instance.
If Err.Number = 429 Then '> 0
Set objExcel = CreateObject("Excel.Application")
End If

objExcel.Visible = false
objExcel.displayalerts=false

'Import CSV into Spreadsheet
Set objWorkbook = objExcel.Workbooks.open(srccsvfile)
Set objWorksheet1 = objWorkbook.Worksheets(1)

'Adjust width of columns
Set objRange = objWorksheet1.UsedRange
objRange.EntireColumn.Autofit()
'This code could be used to AutoFit a select number of columns
'For intColumns = 1 To 17
' objExcel.Columns(intColumns).AutoFit()
'Next

'Make Headings Bold
objExcel.Rows(1).Font.Bold = TRUE

'Freeze header row
With objExcel.ActiveWindow
.SplitColumn = 0
.SplitRow = 1
End With
objExcel.ActiveWindow.FreezePanes = True

'Add Data Filters to Heading Row
objExcel.Rows(1).AutoFilter

'set header row gray
objExcel.Rows(1).Interior.ColorIndex = 15
'-0.249977111117893

'Save Spreadsheet, 51 = Excel 2007-2010 
objWorksheet1.SaveAs tgtxlsfile, 51

'Release Lock on Spreadsheet
objExcel.Quit()
Set objWorksheet1 = Nothing
Set objWorkbook = Nothing
Set ObjExcel = Nothing

Αφού εισαγάγετε το παραπάνω σενάριο, πρέπει να αποθηκεύσετε το αρχείο με την επέκταση αρχείου .vbs . Για αυτό, κάντε κλικ στην επιλογή File > Save As . Στη γραμμή διαλόγου " Αποθήκευση ως(Save As) " , ορίστε την επιλογή "Αποθήκευση ως τύπου(Save As Type) " σε Όλα τα αρχεία(All Files) και, στη συνέχεια, εισαγάγετε το όνομα αρχείου ακολουθούμενο από την επέκταση αρχείου .vbs . Μετά από αυτό, κάντε κλικ στο κουμπί Αποθήκευση(Save) για να αποθηκεύσετε το αρχείο VBS .

Τώρα, μεταβείτε στο φάκελο όπου έχετε αποθηκεύσει την παραπάνω δέσμη ενεργειών VBS και ανοίξτε τη Γραμμή εντολών σε αυτόν τον φάκελο(open Command Prompt in this folder) .

Στη συνέχεια, πρέπει να εισαγάγετε μια εντολή με την παρακάτω σύνταξη στο CMD :

VBSFilename [Input CSV file with path] [Output Excel file with path]

Ας υποθέσουμε ότι έχετε ονομάσει το αρχείο VBS ως "csv-to-excel", τότε η εντολή σας θα μοιάζει με την παρακάτω:

csv-to-excel C:\Users\KOMAL\Desktop\twc.csv C:\Users\KOMAL\Desktop\twc1.xlsx

Σε περίπτωση που θέλετε να δημιουργήσετε ένα αρχείο Excel με την παλαιότερη επέκταση αρχείου, π.χ., XLS , απλώς αντικαταστήστε το xlsx με xls . Εδώ είναι ένα παράδειγμα:

csv-to-excel C:\Users\KOMAL\Desktop\twc.csv C:\Users\KOMAL\Desktop\twc1.xls

Να θυμάστε ότι πρέπει να αναφέρετε την πλήρη διαδρομή τόσο των αρχείων CSV εισόδου όσο και των αρχείων (CSV)Excel εξόδου .

Πώς να μετατρέψετε το CSV σε Excel (XLS ή XLSX) χρησιμοποιώντας τη γραμμή εντολών στα Windows 10

Καθώς εισάγετε την παραπάνω εντολή, θα λάβετε το αρχείο εξόδου Excel .

Μετατρέψτε το CSV σε Excel χρησιμοποιώντας τη γραμμή εντολών

Στο παραπάνω VBScript , υπάρχουν επιλογές για να προσαρμόσετε το πλάτος της στήλης, το πάγωμα του παραθύρου, την εφαρμογή φίλτρου, την έντονη γραφή της κεφαλίδας κ.λπ. Μπορείτε εύκολα να τροποποιήσετε το VBScript για να προσαρμόσετε αυτές τις επιλογές και στη συνέχεια να εκτελέσετε την εντολή για μετατροπή CSV σε Excel μέσω CMD . Εάν είστε προγραμματιστής, μπορείτε να προσαρμόσετε περαιτέρω το σενάριο ανάλογα.

Έτσι, αυτός είναι ο τρόπος με τον οποίο μπορείτε να μετατρέψετε το CSV σε Excel χρησιμοποιώντας τη γραμμή εντολών(Command-Line) με τη βοήθεια ενός VBScript που δημιουργήθηκε από τον Jeff(created by Jeff) .

Σχετικό διαβάζει:(Related reads:)



About the author

Είμαι ειδικός των Windows και εργάζομαι στη βιομηχανία λογισμικού για πάνω από 10 χρόνια. Έχω εμπειρία με συστήματα Microsoft Windows και Apple Macintosh. Οι δεξιότητές μου περιλαμβάνουν: διαχείριση παραθύρων, υλικό και ήχο υπολογιστή, ανάπτυξη εφαρμογών και πολλά άλλα. Είμαι έμπειρος σύμβουλος που μπορεί να σας βοηθήσει να αξιοποιήσετε στο έπακρο το σύστημά σας Windows.



Related posts