Hoe combineer / importeer ik meerdere csv-bestanden in meerdere werkbladen?
Als u meerdere csv-bestanden uit een map wilt importeren als afzonderlijke werkbladen in een werkmap, hoe kunt u deze taak dan in Excel afhandelen?
Importeer meerdere csv-bestanden in afzonderlijke werkbladen met VBA-code
Importeer meerdere csv-bestanden in afzonderlijke werkbladen met Kutools voor Excel
Splits een werkmap op in meerdere afzonderlijke csv / pdf / txt / excel-bestanden
Importeer meerdere csv-bestanden in afzonderlijke werkbladen met VBA-code
Om snel meerdere csv-bestanden in een werkmap te importeren, kan de volgende VBA-code u een plezier doen, doe dit als volgt:
1. Houd de ALT + F11 toetsen in Excel om het Microsoft Visual Basic voor toepassingen venster.
2. Klikken Invoegen > Moduleen plak de volgende code in het Module Venster.
VBA-code: importeer meerdere tekstbestanden naar afzonderlijke werkbladen:
Sub CombineCsvFiles()
'updateby Extendoffice
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. Druk vervolgens op F5 sleutel om deze code uit te voeren, en er verschijnt een venster, ga naar de specifieke map en selecteer de csv-bestanden die je naar Excel wilt importeren, zie screenshot:
4. En klik vervolgens op Openen knop, zijn de geselecteerde csv-bestanden geïmporteerd als afzonderlijke werkbladen in een nieuwe werkmap.
5. Ten slotte kunt u de nieuwe werkmap opslaan zoals u nodig hebt.
Importeer meerdere csv-bestanden in afzonderlijke werkbladen met Kutools voor Excel
Als je Kutools for Excel, met zijn krachtige tool-Combineren, kunt u snel meerdere csv-bestanden combineren of importeren in één enkel werkblad of meerdere gescheiden werkbladen als u dat nodig hebt.
Na het installeren van Kutools for Excel, doe dit als volgt:
1. Klik alstublieft Koetools Plus > Combineren, zie screenshot:
2. In het Combineer werkbladen dialoogvenster, selecteer alstublieft Combineer meerdere werkbladen uit werkmappen in één werkmap, zie screenshot:
3. In de Stap 2 van de wizard, klik op Toevoegen > Dien in Zie screenshot om de csv-bestanden te kiezen die u wilt combineren:
4. In de pop-out Openen dialoogvenster, selecteer (* .csv) uit de vervolgkeuzelijst en specificeer vervolgens de csv-bestanden die u wilt samenvoegen.
5. Dan klikken Openen knop, en uw geselecteerde csv-bestanden zijn geïmporteerd in het dialoogvenster, zie screenshot:
6. In de Stap 3, voer de volgende bewerkingen uit:
(1.) Controle Eerste rij van elk werkblad (opmerkingen) van het Voeg werkbladinformatie in sectie, zal alle csv-bestandeninformatie als commentaar in de gecombineerde bladen worden ingevoegd;
(2.) U kunt de csv-bestanden naar behoefte hernoemen;
(3.) u kunt de lege csv-bestanden overslaan als u een leeg csv-bestand tegenkomt.
7. Dan klikken Finish knop, en nadat u klaar bent met het combineren, kunt u een bestandsnaam en locatie voor uw nieuwe gecombineerde werkmap specificeren. Zie screenshot:
8. Dan klikken Bespaar knop, in het uitgeklapte promt-vak, kunt u het nieuwe bestand openen en klikken Jaen sluit het door op te klikken Nee, zie screenshot:
9. En dan kun je dit scenario opslaan of niet zoals je wilt. Zie screenshot:
10. Eindelijk zijn uw geselecteerde csv-bestanden geïmporteerd in een nieuwe werkmap met een gescheiden werkblad, zie screenshot:
Download en gratis proef Kutools voor Excel nu!
Demo: importeer meerdere csv-bestanden in afzonderlijke werkbladen met Kutools voor Excel
Splits een werkmap op in meerdere afzonderlijke csv / pdf / txt / excel-bestanden
In bepaalde gevallen wilt u misschien een werkmap opsplitsen in afzonderlijke csv-bestanden, Kutools for Excel's Werkmap splitsen hulpprogramma kan deze taak snel en gemakkelijk voltooien.
Na het installeren van Kutools for Excel, doe dit als volgt:
1. Klikken Koetools Plus > werkboek > Werkmap splitsen, zie screenshot:
2. In het Werkmap splitsen dialoog venster:
(1.) Controleer de werkbladen die u wilt splitsen;
(2.) En controleer Specificeer opslaanformaaten kies vervolgens het bestandsformaat dat u wilt opslaan;
(3.) Klik vervolgens Split knop, en specificeer een map om de gescheiden bestanden te plaatsen.
3. En klik vervolgens op OK om te beginnen met splitsen, wordt de werkmap opgesplitst in afzonderlijke csv-bestanden die u nodig hebt.
Download en gratis proef Kutools voor Excel nu!
Splits een werkmap op in meerdere afzonderlijke csv / pdf / txt / excel-bestanden
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!