Kako uvoziti datoteko CSV v delovni list?

Morda nam je enostavno uvoziti ali shraniti delovni list kot datoteko CSV, toda, ali ste že poskusili uvoziti datoteko CSV na delovni list? V tem članku bom govoril o nekaterih zanimivih metodah, kako se boste spoprijeli s to nalogo.

Datoteko CSV uvozite na delovni list s čarovnikom za uvoz besedila

Datoteko CSV uvozite na delovni list s programom Kutools za Excel

Datoteko CSV uvozite na delovni list s kodo VBA

Datoteko CSV uvozite na delovni list s čarovnikom za uvoz besedila

Običajno lahko v Excelu uporabite funkcijo čarovnika za uvoz besedila za uvoz datoteke CSV na delovni list, naredite naslednje:

1. Aktivirajte delovni list, v katerega želite uvoziti datoteko CSV, in kliknite datum > Iz besedila, glej posnetek zaslona:

2. v Uvozi besedilno datoteko v oknu navedite datoteko CSV, ki jo želite uvoziti, glejte posnetek zaslona:

3. Nato kliknite uvoz v koraku 1 koraka Čarovnik za uvoz besedilatako, da izberete Razmejeno možnost, glej posnetek zaslona:

4. Nato kliknite Naslednji > v 2. koraku čarovnika potrdite Comma pod Ločila možnost, glej posnetek zaslona:

5. Nato nadaljujte s klikom Naprej> v 3. koraku čarovnika izberite Besedilo pod razdelkom Oblika podatkov stolpca in vidite, da bo prvi stolpec označen. Nato držite tipko Shift , da označite vse stolpce. Oglejte si posnetek zaslona:

6. Nato kliknite Konec v izpuščenem gumbu Uvoz podatkov v pogovornem oknu izberite mesto, kamor želite vnesti podatke, glejte posnetek zaslona:

7. Kliknite OK , je bila datoteka CSV hkrati uvožena na delovni list.

Datoteko CSV uvozite na delovni list s programom Kutools za Excel

Če imate Kutools za Excel, Z njegovim Vstavite datoteko v kazalec lahko hitro uvozite datoteko CSV, besedilno datoteko, datoteko Excel ali datoteko PRN na trenutni delovni list.

Po namestitvi Kutools za Excel, naredite naslednje:

1. Aktivirajte delovni list, kamor želite uvoziti podatke datoteke CSV.

2. Nato kliknite Kutools Plus > Uvozno-izvoznih > Vstavite datoteko v kazalec, glej posnetek zaslona:

3. v Vstavite datoteko v kazalec pogovorno okno, naredite naslednje možnosti:

(1.) Kliknite gumb, da izberete celico, v katero želite izpisati podatke;

(2.) Nato kliknite Brskanje gumb, da odprete datoteko, ki jo želite vstaviti v okno položaja kurzorja celice;

(3.) V pojavnem oknu izberite Datoteke CSV na desnem spodnjem spustnem seznamu in nato izberite datoteko CSV, ki jo želite uvoziti.

4. Po določitvi datoteke CSV kliknite Odprto , da vrnete prejšnje pogovorno okno, in nato kliknite OK za uvoz datoteke CSV. Datoteka CSV bo vstavljena na točno določeno mesto.

Prenesite in brezplačno preizkusite Kutools za Excel zdaj!

Datoteko CSV uvozite na delovni list s kodo VBA

Če ste zgornje metode po korakih naveličani, lahko to težavo reši tudi naslednja koda VBA.

1. Držite tipko ALT + F11 in odpre tipko Microsoft Visual Basic za aplikacije okno.

2. Kliknite Vstavi > Moduliin prilepite naslednjo kodo v Moduli Okno.

Koda VBA ： Uvozi datoteko CSV na delovni list:

Sub ImportCSVFile()
'Updateby Extendoffice
    Dim xFileName As Variant
    Dim Rg As Range
    Dim xAddress As String
    xFileName = Application.GetOpenFilename("CSV File (*.csv), *.csv", , "Kutools for Excel", , False)
    If xFileName = False Then Exit Sub
    On Error Resume Next
    Set Rg = Application.InputBox("please select a cell to output the data", "Kutools for Excel", Application.ActiveCell.Address, , , , , 8)
    On Error GoTo 0
    If Rg Is Nothing Then Exit Sub
    xAddress = Rg.Address
    With ActiveSheet.QueryTables.Add("TEXT;" & xFileName, Range(xAddress))
        .FieldNames = True
        .RowNumbers = False
        .FillAdjacentFormulas = False
        .PreserveFormatting = True
        .RefreshOnFileOpen = False
        .RefreshStyle = xlInsertDeleteCells
        .SavePassword = False
        .SaveData = True
        .RefreshPeriod = 0
        .TextFilePromptOnRefresh = False
        .TextFilePlatform = 936
        .TextFileStartRow = 1
        .TextFileParseType = xlDelimited
        .TextFileTextQualifier = xlTextQualifierDoubleQuote
        .TextFileConsecutiveDelimiter = False
        .TextFileTabDelimiter = True
        .TextFileSemicolonDelimiter = False
        .TextFileCommaDelimiter = True
        .TextFileSpaceDelimiter = False
        .TextFileTrailingMinusNumbers = True
        .Refresh BackgroundQuery:=False
    End With
    End Sub

3. Nato pritisnite F5 tipko za zagon te kode in v pojavni datoteki izberite datoteko CSV, ki jo želite uvoziti Kutools za Excel pogovorno okno, glej posnetek zaslona:

4. Nato kliknite Odprto in kliknite celico, kamor želite dodati uvožene podatke, glejte posnetek zaslona:

5. In nato kliknite OK, je bila določena datoteka CSV uvožena v delovni list.