Μετάβαση στο κύριο περιεχόμενο

Πώς να εξαγάγετε εύρος κελιών στο Excel σε αρχείο csv;

Στο Excel, μπορούμε να αποθηκεύσουμε ολόκληρο το φύλλο εργασίας ως αρχείο csv χρησιμοποιώντας το Αποθήκευση ως λειτουργία, αλλά, έχετε προσπαθήσει ποτέ να εξαγάγετε μια σειρά κελιών από ένα φύλλο εργασίας σε ένα αρχείο csv; Σε αυτό το άρθρο, θα λάβετε τις μεθόδους για την επίλυση αυτού του προβλήματος στο Excel.

Εξαγωγή εύρους κελιών στο Excel σε αρχείο csv με κωδικό VBA

Εξαγωγή εύρους κελιών στο Excel σε αρχείο csv με το Kutools για Excel


Εξαγωγή εύρους κελιών στο Excel σε αρχείο csv με κωδικό VBA

Εδώ, έχω έναν κωδικό VBA για να εξαγάγω μια σειρά κελιών από το Excel σε αρχείο csv, κάντε τα εξής:

1. Κρατήστε πατημένο το ALT + F11 και ανοίγει το Microsoft Visual Basic για εφαρμογές παράθυρο.

2. Κλίκ Κύριο θέμα > Μονάδα μέτρησηςκαι επικολλήστε τον ακόλουθο κώδικα στο Μονάδα μέτρησης Παράθυρο.

Κωδικός VBA: Εξαγωγή εύρους περιεχομένων κελιού σε αρχείο csv

Sub ExportRangetoFile()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
Dim xFile As Variant
Dim xFileString As String
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Application.ActiveSheet.Copy
Application.ActiveSheet.Cells.Clear
WorkRng.Copy Application.ActiveSheet.Range("A1")
Set xFile = CreateObject("Scripting.FileSystemObject")
xFileString = Application.GetSaveAsFilename("", filefilter:="Comma Separated Text (*.CSV), *.CSV")
Application.ActiveWorkbook.SaveAs Filename:=xFileString, FileFormat:=xlCSV, CreateBackup:=False
End Sub

3. Στη συνέχεια πατήστε F5 για να εκτελέσετε αυτόν τον κώδικα και θα εμφανιστεί ένα πλαίσιο προτροπής για να σας υπενθυμίσει ότι επιλέγετε το εύρος των κελιών που θέλετε να εξαγάγετε ως αρχείο csv.

εύρος εξαγωγής doc στο csv 1

4. Και στη συνέχεια κάντε κλικ στο κουμπί OK κουμπί, καθορίστε έναν κατάλογο για την τοποθέτηση του νέου αρχείου csv και δώστε ένα όνομα για το αρχείο csv στο πλαίσιο κειμένου Όνομα αρχείου, δείτε το στιγμιότυπο οθόνης:

εύρος εξαγωγής doc στο csv 2

5. Στη συνέχεια κάντε κλικ στο κουμπί Αποθήκευση κουμπί και το επιλεγμένο εύρος έχει αποθηκευτεί ως αρχείο csv, μπορείτε να μεταβείτε στον καθορισμένο φάκελο για να το δείτε.


Εξαγωγή εύρους κελιών στο Excel σε αρχείο csv με το Kutools για Excel

Εάν δεν σας ενδιαφέρει ο κωδικός VBA, εδώ, μπορώ να σας παρουσιάσω ένα εύκολο εργαλείο - Kutools για Excel, Με τους Εξαγωγή εύρους σε αρχείο δυνατότητα, μπορείτε να λύσετε γρήγορα αυτήν την εργασία.

Kutools για Excel : με περισσότερα από 300 εύχρηστα πρόσθετα Excel, δωρεάν δοκιμή χωρίς περιορισμό σε 30 ημέρες. 

Μετά την εγκατάσταση Kutools για Excel, κάντε τα παρακάτω βήματα:

1. Επιλέξτε το εύρος δεδομένων που θέλετε να εξαγάγετε στο αρχείο csv.

2. Στη συνέχεια κάντε κλικ στο κουμπί Kutools Plus > Εισαγωγή εξαγωγή > Εξαγωγή εύρους σε αρχείο, δείτε το στιγμιότυπο οθόνης:

3. Στην Εξαγωγή εύρους σε αρχείο , επιλέξτε CSV (οριοθετημένο με κόμμα) από το μορφή αρχείου επιλογή και, στη συνέχεια, καθορίστε το Αποθήκευση καταλόγου για να αποθηκεύσετε το νέο αρχείο csv, δείτε το στιγμιότυπο οθόνης:

εύρος εξαγωγής doc σε csv 4 4

4. Στη συνέχεια κάντε κλικ στο κουμπί Ok κουμπί, θα εμφανιστεί ένα πλαίσιο προτροπής για να σας υπενθυμίσει ότι θα ορίσετε ένα όνομα για αυτό το νέο αρχείο csv όπως χρειάζεστε και, στη συνέχεια, κάντε κλικ στο κουμπί OK για να κλείσετε αυτό το πλαίσιο και τα επιλεγμένα δεδομένα θα εξαχθούν ταυτόχρονα ως αρχείο CSV.

εύρος εξαγωγής doc σε csv 5 5

:

Αποθηκεύστε την πραγματική τιμή: Θα εμφανίσει τις πραγματικές τιμές στο τελικό αρχείο.

Αποθηκεύστε τιμές όπως φαίνεται στην οθόνη: Θα εμφανίσει τις τιμές στο τελικό αρχείο όπως τις διαβάσατε στην οθόνη του υπολογιστή.

Ανοίξτε το αρχείο μετά την εξαγωγή: Θα ανοίξει αυτόματα το τελικό αρχείο μετά την εξαγωγή του εύρους εάν επιλέξετε αυτήν την επιλογή.

Κάντε κλικ για να μάθετε περισσότερα σχετικά με αυτό το βοηθητικό πρόγραμμα εξαγωγής εύρους σε αρχείο.

Κατεβάστε και δωρεάν δοκιμή Kutools για Excel τώρα!


Επίδειξη: Εξαγωγή εύρους κελιών σε αρχείο csv / pdf / txt / html με το Kutools για Excel

Kutools για Excel: με περισσότερα από 300 εύχρηστα πρόσθετα του Excel, δωρεάν δοκιμή χωρίς περιορισμό σε 30 ημέρες. Λήψη και δωρεάν δοκιμή τώρα!

Τα καλύτερα εργαλεία παραγωγικότητας γραφείου

Δημοφιλή χαρακτηριστικά: Εύρεση, επισήμανση ή αναγνώριση διπλότυπων   |  Διαγραφή κενών γραμμών   |  Συνδυάστε στήλες ή κελιά χωρίς απώλεια δεδομένων   |   Γύρος χωρίς φόρμουλα ...
Σούπερ Αναζήτηση: VLookup πολλαπλών κριτηρίων    VLookup πολλαπλών τιμών  |   VLookup σε πολλά φύλλα   |   Ασαφής αναζήτηση ....
Σύνθετη αναπτυσσόμενη λίστα: Γρήγορη δημιουργία αναπτυσσόμενης λίστας   |  Εξαρτημένη αναπτυσσόμενη λίστα   |  Πολλαπλή αναπτυσσόμενη λίστα ....
Διαχειριστής στήλης: Προσθέστε έναν συγκεκριμένο αριθμό στηλών  |  Μετακίνηση στηλών  |  Εναλλαγή κατάστασης ορατότητας κρυφών στηλών  |  Συγκρίνετε εύρη και στήλες ...
Επιλεγμένα Χαρακτηριστικά: Εστίαση πλέγματος   |  Προβολή σχεδίου   |   Μεγάλη Formula Bar    Διαχείριση βιβλίου εργασίας & φύλλου   |  Βιβλιοθήκη πόρων (Αυτόματο κείμενο)   |  Επιλογή ημερομηνίας   |  Συνδυάστε φύλλα εργασίας   |  Κρυπτογράφηση/Αποκρυπτογράφηση κελιών    Αποστολή email ανά λίστα   |  Σούπερ φίλτρο   |   Ειδικό φίλτρο (φίλτρο με έντονη γραφή/πλάγια γραφή/διαγραφή...) ...
Κορυφαία 15 σύνολα εργαλείων12 Κείμενο Εργαλεία (Προσθήκη κειμένου, Κατάργηση χαρακτήρων, ...)   |   50 + Διάγραμμα Τύποι (Gantt διάγραμμα, ...)   |   40+ Πρακτικό ΜΑΘΗΜΑΤΙΚΟΙ τυποι (Υπολογίστε την ηλικία με βάση τα γενέθλια, ...)   |   19 Εισαγωγή Εργαλεία (Εισαγωγή κωδικού QR, Εισαγωγή εικόνας από το μονοπάτι, ...)   |   12 Μετατροπή Εργαλεία (Αριθμοί σε λέξεις, Μετατροπή Συναλλάγματος, ...)   |   7 Συγχώνευση & διαχωρισμός Εργαλεία (Σύνθετες σειρές συνδυασμού, Διαίρεση κελιών, ...)   |   ... κι αλλα

Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου.  Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...

kte καρτέλα 201905


Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη

  • Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
  • Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
  • Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!
Comments (2)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hi,


this doesn't actually work


It still exports the entire sheet even when a range is selected.


Please fix it
This comment was minimized by the moderator on the site
Thank you for this macro, it is very helpful.

Do you know why on some existing large sheets I get extra rows appended? I am selecting the header row cells along with a few data row cells which might be 1000's of rows down in the sheet. These appended rows show up in the output .csv file with a comma for each column in the source selection. If I manually create a small sheet such as your example this does not happen.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations