Namig: drugi jeziki so prevedeni v Google. Lahko obiščete English različico te povezave.
Vpiši se
x
or
x
x
Registracija
x

or

Kako združiti / uvoziti več csv datotek na več delovnih listov?

Če želite uvoziti več csv datotek iz mape kot ločene delovne liste v delovnem zvezku, kako lahko to opravilo rešite v Excelu?

Uvozite več csv datotek v ločene preglednice s kodo VBA

Uvozite več csv datotek v ločene delovne liste z orodji Kutools for Excel

Delite delovni zvezek v več ločenih datotekah csv / pdf / txt / excel


Združite / uvozite več delovnih listov ali datotek CSV v eno delovno knjigo:

V vsakodnevnem delu lahko združite več delovnih listov ali delovnih zvezkov v en delovni list ali delovni zvezek, lahko veliko in glavno delo. Ampak, če imate Kutools za Excel, s svojo močno korist - Združite, lahko hitro združite več delovnih listov, delovnih zvezkov v delovni list ali delovni zvezek.

doc uvoz csv na delovni list 6

Kutools za Excel: z več kot 200 priročnimi dodatki Excel, lahko brezplačno poskusite brez omejitev v dnevih 60. Prenesite in brezplačno preizkusite zdaj!



Če želite hitro uvažati več csv datotek v delovno zvezo, vam lahko naslednja koda VBA naredi uslugo:

1. Drži dol ALT + F11 ključe v Excelu, da odprete Microsoft Visual Basic za aplikacije okno.

2. Kliknite Vstavi > Moduli, in prilepite naslednjo kodo v Moduli Okno.

VBA koda: uvozite več besedilnih datotek, da ločite delovne liste:

Sub CombineCsvFiles()
'updateby Extendoffice 20151015
    Dim xFilesToOpen As Variant
    Dim I As Integer
    Dim xWb As Workbook
    Dim xTempWb As Workbook
    Dim xDelimiter As String
    Dim xScreen As Boolean
    On Error GoTo ErrHandler
    xScreen = Application.ScreenUpdating
    Application.ScreenUpdating = False
    xDelimiter = "|"
    xFilesToOpen = Application.GetOpenFilename("Text Files (*.csv), *.csv", , "Kutools for Excel", , True)
    If TypeName(xFilesToOpen) = "Boolean" Then
        MsgBox "No files were selected", , "Kutools for Excel"
        GoTo ExitHandler
    End If
    I = 1
    Set xTempWb = Workbooks.Open(xFilesToOpen(I))
    xTempWb.Sheets(1).Copy
    Set xWb = Application.ActiveWorkbook
    xTempWb.Close False
    Do While I < UBound(xFilesToOpen)
        I = I + 1
        Set xTempWb = Workbooks.Open(xFilesToOpen(I))
        xTempWb.Sheets(1).Move , xWb.Sheets(xWb.Sheets.Count)
    Loop
ExitHandler:
    Application.ScreenUpdating = xScreen
    Set xWb = Nothing
    Set xTempWb = Nothing
    Exit Sub
ErrHandler:
    MsgBox Err.Description, , "Kutools for Excel"
    Resume ExitHandler
End Sub

3. Nato pritisnite F5 ključ za izvedbo te kode in okno bo izpuščeno, pojdite v določeno mapo in izberite datoteke CSV, ki jih želite uvoziti v Excel, si oglejte posnetek zaslona:

doc uvoz csv na delovni list 1

4. In nato kliknite Odprto so izbrane datoteke CSV uvožene kot ločene delovne liste v novem delovnem zvezku.

5. Na koncu lahko shranite novo delovno knjižico, kot jo potrebujete.


Če imate Kutools za Excel, s svojo močno orodje-Združite, lahko hitro kombinirate ali uvozite več csv datotek v en delovni list ali več ločenih delovnih listov, kot jih potrebujete.

Po namestitvi Kutools za Excel, storite naslednje:

1. Prosimo, kliknite Podjetje > Združite, si oglejte sliko zaslona:

doc uvoz csv na delovni list 5

2. v Združite delovne liste pogovorno okno, izberite Združite več delovnih listov iz delovnih zvezkov v en delovni zvezek, si oglejte sliko zaslona:

doc uvoz csv na delovni list 6

3. v korak 2 čarovnika kliknite Dodaj > file da izberete datoteke csv, ki jih želite združiti, si oglejte posnetek zaslona:

doc uvoz csv na delovni list 7

4. V izpuščenem Odprto dialog, izberite (* .csv) s spustnega seznama in nato določite datoteke csv, ki jih želite združiti.

doc uvoz csv na delovni list 8

5. Nato kliknite Odprto gumb in izbrane datoteke CSV so bile uvožene v pogovorno okno, glejte sliko zaslona:

doc uvoz csv na delovni list 9

6. v korak 3, naredite naslednje operacije:

(1.) Preverjanje Prva vrstica vsakega delovnega lista (komentarji) Iz Vstavite informacije o delovnem listu oddelek, bodo vse informacije o datotekah CSV vstavljene v kombinirane liste kot komentarje;

(2.) Preimenujete datoteke CSV, kot jih potrebujete;

(3.) Lahko preskočite prazne datoteke csv, ko naletite na prazno csv datoteko.

doc uvoz csv na delovni list 10

7. Nato kliknite Konec in po zaključku združevanja lahko določite ime filma in lokacijo za novo kombinirano delovno knjižico. Prikaz slike:

doc uvoz csv na delovni list 11

8. Nato kliknite Shrani gumb, v popped out promt polje, lahko odprete nov klik datoteke Da, in ga zaprite s klikom Ne, si oglejte sliko zaslona:

doc uvoz csv na delovni list 12

9. In potem lahko ta scenarij shranite ali ne, kot želite. Prikaz slike:

doc uvoz csv na delovni list 13

10. Končno so bile vaše izbrane datoteke CSV uvožene v novo delovno knjigo z ločenim delovnim listom, si oglejte posnetek zaslona:

doc uvoz csv na delovni list 14

Prenesite in brezplačno preizkusite Kutools za Excel zdaj!


Kutools za Excel: z več kot 200 priročnimi dodatki Excel, lahko brezplačno poskusite brez omejitev v dnevih 60. Prenesite in brezplačno preizkusite zdaj!


V določenem primeru boste morda želeli razdeliti delovni zvezek v ločene datoteke CSV. Kutools za Excelovo orodje Delovni zvezek lahko to delo hitro in enostavno zaključi.

Kutools za Excel : z več kot 300 priročnimi dodatki Excel, lahko brezplačno poskusite brez omejitev v dnevih 60.

Po namestitvi Kutools za Excel, storite naslednje:

1. Kliknite Podjetje > Delovni zvezek > Delovni zvezek Split, si oglejte sliko zaslona:

doc uvoz csv na delovni list 2

2. v Delovni zvezek Split pogovorno okno:

(1.) Preverite delovne liste, ki jih želite razdeliti;

(2.) In preverite Določi shranjevanjeformat, nato izberite obliko datoteke, ki jo želite shraniti;

(3.) Nato kliknite Split gumb in določite mapo, v kateri bodo ločene datoteke.

doc uvoz csv na delovni list 3

3. In nato kliknite OK Če želite začeti deljenje, bo delovni zvezek razdeljen na ločene datoteke CSV, ki jih potrebujete.

doc uvoz csv na delovni list 4

Prenesite in brezplačno preizkusite Kutools za Excel zdaj!


Kutools za Excel: z več kot 200 priročnimi dodatki Excel, lahko brezplačno poskusite brez omejitev v dnevih 60. Prenesite in brezplačno preizkusite zdaj!


Priporočena orodja za produktivnost za Excel

zavihek kte 201905

Kutools za Excel vam pomaga, da vedno končate delo pred časom in izstopite iz množice

  • Več kot zmogljive napredne funkcije 300, zasnovane za 1500 delovne scenarije, ki povečujejo produktivnost z 70%, vam dajejo več časa za skrb za družino in uživanje v življenju.
  • Ne potrebujete več pomnilniških formul in VBA kod, od zdaj naprej pa dajate svojim možganom počitek.
  • Postanite strokovnjak za Excel v minutah 3, zapletene in ponavljajoče se operacije lahko opravite v nekaj sekundah,
  • Vsak dan zmanjšajte število operacij tipkovnice in miške, zdaj se poslovite od poklicnih bolezni.
  • 110,000 visoko učinkovite ljudi in 300 + svetovno priznanih podjetij izbiro.
  • Brezplačna preizkusna različica 60 dneva. 60-dnevno jamstvo vračila denarja. 2 let brezplačne nadgradnje in podpore.

Prinaša kartično brskanje in urejanje za Microsoft Office, veliko močnejši od zavihkov brskalnika

  • Office Tab je namenjen za Word, Excel, PowerPoint in druge Office aplikacije: Založnik, Dostop, Visio in Projekt.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Z 50% poveča vašo produktivnost in vsak dan zmanjša na stotine klikov z miško!
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.
    Rohit · 1 months ago
    Thank you . Very handy
  • To post as a guest, your comment is unpublished.
    Amit · 2 months ago
    Thank you! The code was very useful
  • To post as a guest, your comment is unpublished.
    Andrew · 2 years ago
    Thank you for sharing this code. It is exactly what I was looking for.

    Sadly it is not working as well as I hoped it would.

    I am receiving an error message every time the code is run.
    ERROR: "The name is already taken. Try a different one."

    Notes:
    - I am trying to combine four csv files
    - All of the csv files have the same name "file_name.csv, file_name(1).csv, etc..."


    The code combines the first two csv files into one workbook and the the third file into its own workbook. The fourth file never had a chance because of the error.

    If anyone has some thoughts as how to go about fixing this issue I would greatly appreciate your feedback.

    Thank you all in advanced for you time.

    Best regards,
    Andrew
  • To post as a guest, your comment is unpublished.
    Mary · 2 years ago
    Thank you for the code on combining files.

    I however want to have the multiple files in the workbook I am currently working with, not for the code to create a new workbook.

    How do I go about achieving that?