Astuce: Les autres langues sont Google-Traduction. Vous pouvez visiter le English version de ce lien.
Se connecter
x
or
x
x
S'enregistrer
x

or

Comment combiner / importer plusieurs fichiers CSV dans plusieurs feuilles de calcul?

Si vous souhaitez importer plusieurs fichiers CSV à partir d'un dossier en tant que feuilles de travail distinctes dans un classeur, comment pouvez-vous gérer ce travail dans Excel?

Importer plusieurs fichiers CSV dans des feuilles de calcul séparées avec du code VBA

Importer plusieurs fichiers CSV dans des feuilles de calcul séparées avec Kutools pour Excel

Fractionner un classeur en plusieurs fichiers csv / pdf / txt / excel séparés


Combiner / importer plusieurs feuilles de calcul ou fichiers CSV dans un classeur:

Dans votre travail quotidien, combiner plusieurs feuilles de travail ou classeurs en une seule feuille de travail ou classeur peut être un travail énorme et laborieux. Mais, si vous avez Kutools for Excel, avec son utilité puissante - Combiner, vous pouvez rapidement combiner plusieurs feuilles de calcul, classeurs dans une feuille de calcul ou un classeur.

doc importer csv à la feuille de calcul 6

Kutools for Excel: avec plus que 200 compléments Excel pratiques, libre d'essayer sans limitation dans les jours 60. Téléchargez et essai gratuit maintenant!



Pour importer rapidement plusieurs fichiers CSV dans un classeur, le code VBA suivant peut vous faire une faveur, procédez comme suit:

1. Maintenez le ALT + F11 clés dans Excel pour ouvrir le Microsoft Visual Basic pour applications fenêtre.

2. Cliquez insérer > Moduleet collez le code suivant dans le Module Fenêtre.

Code VBA: Importez plusieurs fichiers texte dans des feuilles de calcul séparées:

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. Puis appuyez F5 clé pour exécuter ce code, et une fenêtre apparaîtra, allez dans le dossier spécifique et sélectionnez les fichiers csv que vous souhaitez importer dans Excel, voir capture d'écran:

doc importer csv à la feuille de calcul 1

4. Et puis cliquez Ouvert bouton, les fichiers csv sélectionnés ont été importés en tant que feuilles de travail distinctes dans un nouveau classeur.

5. Enfin, vous pouvez enregistrer le nouveau classeur selon vos besoins.


Si vous avez Kutools for Excel, avec son puissant outilCombiner, vous pouvez rapidement combiner ou importer plusieurs fichiers CSV dans une seule feuille de calcul ou plusieurs feuilles de calcul séparées selon vos besoins.

Après l'installation de Kutools for Excel, s'il vous plaît faites comme suit:

1. Cliquez s'il vous plait Entreprise > Combiner, voir capture d'écran:

doc importer csv à la feuille de calcul 5

2. Dans le Combiner les feuilles de travail boîte de dialogue, sélectionnez Combiner plusieurs feuilles de calcul à partir de classeurs dans un classeur, voir capture d'écran:

doc importer csv à la feuille de calcul 6

3. Dans le Étape 2 de l'assistant, cliquez sur Ajoutez > Fichier pour choisir les fichiers csv que vous voulez combiner, voir capture d'écran:

doc importer csv à la feuille de calcul 7

4. Dans le sauté Ouvert dialogue, sélectionnez (* .csv) dans la liste déroulante, puis spécifiez les fichiers csv que vous souhaitez fusionner.

doc importer csv à la feuille de calcul 8

5. Puis clique Ouvert bouton, et vos fichiers csv sélectionnés ont été importés dans la boîte de dialogue, voir capture d'écran:

doc importer csv à la feuille de calcul 9

6. Dans le Étape 3, veuillez faire les opérations suivantes:

(1.) Vérification Première rangée de chaque feuille de travail (commentaires) du Insérer des informations de feuille de calcul section, toutes les informations sur les fichiers csv seront insérées dans les feuilles combinées sous forme de commentaires;

(2.) Vous pouvez renommer les fichiers csv selon vos besoins;

(3.) Vous pouvez ignorer les fichiers CSV vierges lorsque vous encodez un fichier CSV vierge.

doc importer csv à la feuille de calcul 10

7. Puis clique finition bouton, et après avoir terminé la combinaison, vous pouvez spécifier un nom de fichier et un emplacement pour votre nouveau classeur combiné. Voir la capture d'écran:

doc importer csv à la feuille de calcul 11

8. Puis clique Épargnez bouton, dans la boîte prompte out, vous pouvez ouvrir le nouveau fichier cliquez Ouiet fermez-le en cliquant Non, voir capture d'écran:

doc importer csv à la feuille de calcul 12

9. Et puis vous pouvez enregistrer ce scénario ou non comme vous le souhaitez. Voir la capture d'écran:

doc importer csv à la feuille de calcul 13

10. Enfin, vos fichiers csv sélectionnés ont été importés dans un nouveau classeur avec feuille de calcul séparée, voir capture d'écran:

doc importer csv à la feuille de calcul 14

Télécharger et tester gratuitement Kutools for Excel maintenant!


Kutools for Excel: avec plus que 200 compléments Excel pratiques, libre d'essayer sans limitation dans les jours 60. Téléchargez et essai gratuit maintenant!


Dans certains cas, vous souhaiterez peut-être scinder un classeur en fichiers csv distincts. L'utilitaire Split Workbook de Kutools for Excel peut terminer ce travail rapidement et facilement.

Kutools for Excel : avec plus de 300 compléments Excel pratiques, libre d'essayer sans limitation dans 60 jours.

Après l'installation de Kutools for Excel, s'il vous plaît faites comme suit:

1. Cliquez Entreprise > Classeur > Manuel de travail divisé, voir capture d'écran:

doc importer csv à la feuille de calcul 2

2. Dans le Manuel de travail divisé boite de dialogue:

(1.) Vérifiez les feuilles de calcul que vous souhaitez fractionner;

(2.) Et vérifiez Spécifiez la sauvegardeformat, puis choisissez le format de fichier que vous souhaitez enregistrer;

(3.) Puis cliquez Divisé bouton, et spécifiez un dossier pour mettre les fichiers séparés.

doc importer csv à la feuille de calcul 3

3. Et puis cliquez OK Pour commencer à scinder, le classeur sera divisé en fichiers CSV distincts dont vous avez besoin.

doc importer csv à la feuille de calcul 4

Télécharger et tester gratuitement Kutools for Excel maintenant!


Kutools for Excel: avec plus que 200 compléments Excel pratiques, libre d'essayer sans limitation dans les jours 60. Téléchargez et essai gratuit maintenant!


Kutools for Excel résout la plupart de vos problèmes et augmente votre productivité de 80%

  • Réutilisation: Insérer rapidement formules complexes, graphiques et tout ce que vous avez utilisé auparavant; Crypter les cellules avec mot de passe Créer une liste de diffusion et envoyer des emails ...
  • Super Formula Bar (éditez facilement plusieurs lignes de texte et de formule); Disposition de lecture (facilement lire et éditer un grand nombre de cellules); Coller à la gamme filtrée...
  • Fusionner les cellules / rangées / colonnes sans perdre de données; Contenu des cellules divisées; Combiner les lignes / colonnes en double... Prévenir les cellules en double; Comparer les plages...
  • Sélectionnez Dupliquer ou Unique Des rangées; Sélectionnez les lignes vierges (toutes les cellules sont vides); Super Find et Fuzzy Find dans de nombreux cahiers d'exercices; Sélection aléatoire ...
  • Copie exacte Plusieurs cellules sans changer la référence de la formule; Créer automatiquement des références à plusieurs feuilles; Insérer des balles, Cases à cocher et plus ...
  • Extrait du texte, Ajouter du texte, Supprimer par position, Supprimer l'espace; Créer et imprimer des sous-totaux de pagination; Conversion entre contenu de cellules et commentaires...
  • Super filtre (enregistrer et appliquer des schémas de filtrage à d'autres feuilles); Tri avancé par mois / semaine / jour, fréquence et plus; Filtre spécial en gras, en italique ...
  • Combinaison de classeurs et de feuilles de calcul; Fusionner les tables en fonction des colonnes clés; Fractionner les données en plusieurs feuilles; Conversion par lots xls, xlsx et PDF...
  • Plus que de puissantes fonctionnalités 300. Prend en charge Office / Excel 2007-2019 et 365. Prend en charge toutes les langues. Déploiement facile dans votre entreprise ou organisation. Fonctionnalités complètes Essai gratuit du jour 30.
kte tab 201905

Office Tab apporte une interface à onglets à Office et simplifie grandement votre travail

  • Activer l'édition par onglets et la lecture dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
  • Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
  • Augmente votre productivité de 50% et réduit le nombre de clics de souris pour vous chaque jour!
fond officetab
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 · 7 months ago
    Thank you . Very handy
  • To post as a guest, your comment is unpublished.
    Amit · 7 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 · 3 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?