Hoe importeert u een CSV-bestand in een werkblad?
Het lijkt misschien eenvoudig om een werkblad te importeren of op te slaan als CSV-bestand, maar heeft u ooit geprobeerd een CSV-bestand in een werkblad te importeren? In dit artikel bespreek ik enkele slimme methoden om deze taak vlot te volbrengen.
CSV-bestand importeren in werkblad met de wizard voor tekstimport
CSV-bestand importeren in werkblad met Kutools voor Excel
CSV-bestand importeren in werkblad met VBA-code
CSV-bestand importeren in werkblad met de wizard voor tekstimport
Normaal gesproken gebruikt u in Excel de Wizard voor tekstimport om het CSV-bestand naar een werkblad te importeren. Volg deze stappen:
1. Activeer het werkblad waarin u het CSV-bestand wilt importeren en klik vervolgens op Gegevens > Van tekst, zie de schermafbeelding:
2. In het venster Importeren Tekstbestand geeft u het CSV-bestand op dat u wilt importeren. Zie de schermafbeelding:
3. Klik vervolgens op de knop Importeren. In stap 1 van de Wizard voor tekstimport selecteert u de optie Gescheiden, zie schermafbeelding:
4. Klik daarna op de knop Volgende>. In stap 2 van de wizard vinkt u onder de optie Scheidingstekens het vakje Komma aan, zie schermafbeelding:
5. Klik daarna opnieuw op de knop Volgende >. In de stap Tekst van de Kutools voor Excel-wizard, in het gedeelte Kolomgegevensindeling, ziet u dat de eerste kolom is gemarkeerd. Houd vervolgens de toets Shift ingedrukt om alle kolommen te selecteren. Zie schermafbeelding:
6. Klik vervolgens op de knop Voltooien. In het venster Gegevens importeren kiest u de locatie waar u de gegevens wilt plaatsen, zie schermafbeelding:
7. Klik op de knop OK. Het CSV-bestand wordt nu direct in het werkblad geïmporteerd.
CSV-bestand importeren in werkblad met Kutools voor Excel
Als u Kutools voor Excel hebt, kunt u met het hulpprogramma Bestand invoegen op cursorpositie snel een CSV-, tekst-, Excel- of PRN-bestand importeren naar het huidige werkblad.
Na installatie van Kutools voor Excelvoert u de volgende stappen uit:
1. Activeer het werkblad waarin u de gegevens uit het CSV-bestand wilt importeren.
2. Klik vervolgens op KUTOOLS PLUS > Importeren/Exporteren > Bestand invoegen op cursorpositie, zie schermafbeelding:
3.Voer in het dialoogvenster Bestand invoegen op cursorpositiede volgende opties uit:
(1.) Klik op de knop 
om een cel te selecteren waar u de gegevens wilt weergeven;
(2.) Klik daarna op de knop Bladerenom het venster Bestand selecteren om in te voegen op de positie van de celcursor te openen;
(3.) Selecteer in het venster dat verschijnt CSV-bestanden in de keuzelijst rechtsonder en kies vervolgens het CSV-bestand dat u wilt importeren.
 |
 |
 |
4.Nadat u het CSV-bestand hebt opgegeven, klikt u op de knop Openen om terug te keren naar het vorige dialoogvenster en vervolgens op OK om het CSV-bestand te importeren. Het bestand wordt dan op de gewenste locatie ingevoegd.
Download nu de gratis proefversie van Kutools voor Excel!
CSV-bestand importeren in werkblad met VBA-code
Als u de bovenstaande methode stap voor stap te bewerkelijk vindt, lost de volgende VBA-code dit probleem ook op.
1. Houd de toetsen ALT + F11 ingedrukt om het venster Microsoft Visual Basic for Applications te openen.
2. Klik op Invoegen > Module en plak de volgende code in het Module-venster.
VBA-code: CSV-bestand importeren in werkblad:
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. Druk vervolgens op de toets F5 om deze code uit te voeren en kies het CSV-bestand dat u wilt importeren in het venster Kutools voor Excel dat verschijnt, zie schermafbeelding:
4. Klik daarna op de knop Openen en klik op een cel waar u de geïmporteerde gegevens wilt plaatsen. Zie schermafbeelding:
5. Klik daarna op OK. Het betreffende CSV-bestand is nu geïmporteerd in het werkblad.
Beste Office-productiviteitshulpmiddelen
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie zoals nooit tevoren.Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en Tijd besparen.Klik hier om de functie te krijgen die u het meest nodig heeft...
Office Tab brengt een tabbladinterface naar Office en maakt uw werk veel eenvoudiger
- Schakel tabbladbewerking en -lezen in voor Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten aan in nieuwe tabbladen binnen hetzelfde venster, in plaats van in afzonderlijke vensters.
- Verhoogt uw productiviteit met 50 % en bespaart u dagelijks honderden muisklikken!
Alle Kutools-add-ins in één installatieprogramma.
Kutools for Office bundelt add-ins voor Excel, Word, Outlook en PowerPoint, plus Office Tab Pro—ideaal voor teams die met meerdere Office-apps werken.
- Alles-in-één suite— add-ins voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro
- Één installatieprogramma, één licentie— binnen enkele minuten klaar (MSI-geschikt)
- Werkt beter samen— gestroomlijnde productiviteit in alle Office-apps
- 30 dagen volledig functionele proefversie— geen registratie, geen creditcard
- Beste prijs-kwaliteitverhouding— bespaar ten opzichte van het afzonderlijk kopen van add-ins