Patarimas: kitos kalbos yra "Google" išverstos. Galite aplankyti English šios nuorodos versija.
Prisijungti
x
or
x
x
Registruotis
x

or

Kaip eksportuoti "Excel" ląstelių asortimentą į CSV failą?

"Excel", mes galime išsaugoti visą darbalapį kaip CSV failą naudodami Įrašyti kaip funkcija, bet ar kada nors bandėte eksportuoti daugybę langelių iš vieno darbalapio į CSV failą? Šiame straipsnyje rasite metodus, kaip išspręsti šią problemą "Excel".

Eksportuokite "Excel" ląstelių asortimentą į CSV failą su VBA kodu

Eksportuokite "Excel" ląstelių asortimentą į CSV failą su "Kutools" Excel


Eksportuokite "Excel" ląstelių asortimentą į CSV failą su VBA kodu


Čia turiu VBA kodą, norėdami eksportuoti ląsteles iš Excel į CSV failą, prašau:

1. Laikykite nuspaudę ALT + F11 raktus, ir tai atveria "Microsoft Visual Basic for Applications" langas.

2, Spauskite įsiuvas > Moduliaiir įklijuokite šį kodą Moduliai Langas.

VBA kodas: Eksportuokite ląstelių turinio diapazoną į CSV failą

Sub ExportRangetoFile()
'Update 20150628
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. Tada paspauskite F5 paleiskite šį kodą ir pasirodys greitas langas, primenantis jums pasirinkti ląstelių, kurias norite eksportuoti kaip CSV failą, asortimentą.

doc eksporto diapazonas į CSV 1

4. Ir tada spustelėkite OK mygtuką, nurodykite katalogą, kuriame norite įdiegti naują CSV failą, ir įveskite failo CSV pavadinimą teksto lauke Failo pavadinimas, žr. ekrano kopiją:

doc eksporto diapazonas į CSV 2

5. Tada spustelėkite Išsaugoti mygtukas ir pasirinktas diapazonas buvo išsaugotas kaip CSV failas, galite pereiti į nurodytą aplanką, kad jį peržiūrėtumėte.


Eksportuokite "Excel" ląstelių asortimentą į CSV failą su "Kutools" Excel

Jei jus domina VBA kodas, čia galiu pristatyti jums paprastą įrankį - Kutools for Excel, Su savo Eksportas į failą funkcija, galite greitai išspręsti šį darbą.

Kutools for Excel : su daugiau nei 300 patogiais "Excel" priedais, galite nemokamai išbandyti be apribojimų per 60 dienas.

po diegimas Kutools for Excel, atlikite šiuos veiksmus:

1. Pasirinkite duomenų diapazoną, kurį norite eksportuoti į CSV failą.

2. Tada spustelėkite įmonė > Importas eksportas > Eksportas į failą, žr. ekrano kopiją:

doc eksporto diapazonas į CSV 3 3

3. Be Eksportas į failą Dialogo lange pasirinkite CSV (kableliais apribotas) nuo failo formatas parinktį, tada nurodykite Išsaugoti katalogą Norėdami išsaugoti naują CSV failą, žr. ekrano kopiją:

doc eksporto diapazonas į CSV 4 4

4. Tada spustelėkite Ok mygtukas pasirodys greito langelio langas, priminantis, kad jums reikia nurodyti tokio naujo CSV failo pavadinimą, tada spustelėkite OK uždaryti šį langelį ir pasirinkti duomenys bus eksportuojami kaip CSV failas vienu metu.

doc eksporto diapazonas į CSV 5 5

Pastabos:

Išsaugokite faktinę vertę: Ji parodys faktines galutinio failo reikšmes.

Išsaugokite vertes, kaip parodyta ekrane: Jis parodys galutinio failo reikšmes taip pat, kaip juos skaitėte kompiuterio ekrane.

Atidarykite failą po eksporto: Jei pasirinkote šią parinktį, ji automatiškai atidarys galutinę bylą eksportuodami diapazoną.

Spustelėkite, jei norite sužinoti daugiau apie šią "Eksporto į failą" programą.

Atsisiųskite ir nemokamą bandomąją "Kutools" programą "Excel Now"!


Demo: Eksportuoti ląstelių diapazoną į csv / pdf / txt / html failą su "Kutools" Excel

Kutools for Excel: su daugiau nei 200 patogiais "Excel" priedais, galite nemokamai bandyti be apribojimų per 60 dienas. Atsisiųskite ir nemokamai bandykite dabar!


Rekomenduojami įrankiai našumui

„Excel“ juosta (įdiegta „Kutools for Excel“)

300 + Išplėstinės funkcijos Padidinkite produktyvumą 71% ir padėkite išsiskirti iš minios!

Ar norėtumėte greitai ir puikiai atlikti savo kasdienį darbą? Kutools for Excel atneša 300 + vėsios ir galingos papildomos funkcijos (Kombinuoti darbo knygas, sumą pagal spalvą, padalintų langelių turinį, konvertuoti datą ir kt.) 1500 + darbo scenarijai, padeda jums išspręsti 82% „Excel“ problemos.

  • Susidomėkite su visomis sudėtingomis užduotimis per kelias sekundes, sulaukite sėkmės iš stiprios konkurencijos ir niekada nesirūpinkite dėl to, kad esate atleistas.
  • Sutaupykite daug darbo laiko, palikite daug laiko mylėti ir rūpintis šeima ir mėgautis patogiu gyvenimu dabar.
  • Kasdien sumažinkite tūkstančius klaviatūros ir pelės paspaudimų, atleiskite pavargusias akis ir rankas, ir suteikti jums sveiką kūną.
  • Tapkite „Excel“ ekspertu „3“ minutėmis ir žavėkitės savo kolegomis ar draugais.
  • Nereikia prisiminti skausmingų formulių ir VBA kodų, atsipalaiduoti ir maloniai mąstyti, duoti jums jaudulį, kurio anksčiau neturėjote.
  • Praleiskite tik $ 39, bet verta už kitų 4000 mokymą. Naudojamos 110,000 elito ir 300 + žinomos įmonės.
  • 60 dienos neribotas nemokamas bandymas. 60 dienos pinigų grąžinimo garantija. Nemokamas „2“ metų atnaujinimas ir palaikymas. Pirkite vieną kartą, naudokite amžinai.
  • Pakeiskite savo darbo būdą ir nedelsiant suteikite geresnį gyvenimą!

Skirtukas „Office“ atneša efektyvius ir patogius skirtukus į „Office“ (įskaitant „Excel“), kaip „Chrome“, „Firefox“ ir „New IE“

  • Kai peržiūrite ir redaguojate kelis dokumentus, 50% padidina našumą.
  • Sumažinkite šimtus pelės paspaudimų kiekvieną dieną, atsisveikinkite su pele.
  • Atidarykite ir sukurkite dokumentus naujuose to paties lango skirtukuose, o ne naujuose languose.
  • Padėkite jums dirbti greičiau ir lengvai išsiskirti iš minios! Vieną sekundę, jei norite persijungti iš dešimčių atvirų dokumentų!
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    D Pritchard · 6 months ago
    Hi,


    this doesn't actually work


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


    Please fix it
  • To post as a guest, your comment is unpublished.
    Bill James · 1 years ago
    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.