Note: The other languages of the website are Google-translated. Back to English

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 calcul distinctes dans un classeur, comment pouvez-vous gérer ce travail dans Excel?

Importez plusieurs fichiers csv dans des feuilles de calcul distinctes avec le code VBA

Importez plusieurs fichiers csv dans des feuilles de calcul séparées avec Kutools for Excel

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


Pour importer rapidement plusieurs fichiers csv dans un classeur, le code VBA suivant peut vous rendre service, 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 distinctes:

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. 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 dans la feuille de calcul 1

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

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


Si vous avez Kutools pour Excel, avec son outil puissantCombiner, 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 pour Excel, veuillez faire comme ceci:

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

2. Dans le Combiner des feuilles de travail boîte de dialogue, veuillez sélectionner Combinez plusieurs feuilles de calcul de classeurs dans un seul classeur, voir capture d'écran:

doc importer csv dans la feuille de calcul 6

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

doc importer csv dans la feuille de calcul 7

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

doc importer csv dans la feuille de calcul 8

5. Puis clique Open 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 dans la feuille de calcul 9

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

(1.) Vérification Première ligne de chaque feuille de calcul (commentaires) du Insérer les informations de la 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 rencontrez un fichier csv vierge.

doc importer csv dans la feuille de calcul 10

7. Puis clique Finition 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 dans la feuille de calcul 11

8. Puis clique Enregistrer bouton, dans la boîte de dialogue contextuelle, vous pouvez ouvrir le nouveau fichier cliquez sur Oui, et fermez-le en cliquant Non, voir capture d'écran:

doc importer csv dans 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 dans la feuille de calcul 13

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

doc importer csv dans la feuille de calcul 14

Téléchargez et essayez gratuitement Kutools for Excel Now!


Kutools pour Excel: avec plus de 300 compléments Excel pratiques, essai gratuit sans limitation dans 30 jours. Téléchargez et essayez gratuitement maintenant!

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

Après l'installation de Kutools pour Excel, veuillez faire comme ceci:

1. Cliquez Kutools Plus > Classeur > Classeur fractionné, voir capture d'écran:

2. Dans le Classeur fractionné boite de dialogue:

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

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

(3.) Cliquez ensuite sur Divisé et spécifiez un dossier dans lequel placer les fichiers séparés.

doc importer csv dans la feuille de calcul 3

3. Et puis cliquez OK pour commencer à se diviser, le classeur sera divisé en fichiers csv séparés dont vous avez besoin.

doc importer csv dans la feuille de calcul 4

Téléchargez et essayez gratuitement Kutools for Excel Now!


Kutools pour Excel: avec plus de 300 compléments Excel pratiques, essai gratuit sans limitation dans 30 jours. Téléchargez et essayez gratuitement maintenant!

Les meilleurs outils de productivité de bureau

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 e-mails ...
  • Barre Super Formula (modifiez facilement plusieurs lignes de texte et de formule); Disposition de lecture (lire et modifier facilement un grand nombre de cellules); Coller dans la plage filtrée...
  • Fusionner les cellules / lignes / colonnes sans perdre de données; Contenu des cellules divisées; Combiner des lignes / colonnes en double... Empêcher les cellules en double; Comparer les gammes...
  • Sélectionnez Dupliquer ou Unique Lignes; Sélectionnez les lignes vides (toutes les cellules sont vides); Super Find et Fuzzy Find dans de nombreux classeurs; Sélection aléatoire ...
  • Copie exacte Plusieurs cellules sans changer la référence de formule; Créer automatiquement des références à plusieurs feuilles; Insérer des puces, Cases à cocher et plus encore ...
  • Extrait du texte, Ajouter du texte, Supprimer par position, Supprimer l'espace; Créer et imprimer des sous-totaux de pagination; Conversion entre le contenu et les commentaires des cellules...
  • 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 par gras, italique ...
  • Combiner des classeurs et des feuilles de travail; Fusionner les tableaux en fonction des colonnes clés; Diviser les données en plusieurs feuilles; Conversion par lots xls, xlsx et PDF...
  • Plus de 300 fonctionnalités puissantes. Prend en charge Office / Excel 2007-2019 et 365. Prend en charge toutes les langues. Déploiement facile dans votre entreprise ou organisation. Essai gratuit de 30 jours. Garantie de remboursement de 60 jours.
onglet kte 201905

Office Tab apporte une interface à onglets à Office et simplifie considérablement votre travail

  • Activer l'édition et la lecture par onglets 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 des centaines de clics de souris chaque jour!
bas de cabine
Commentaires (6)
Pas encore de notes. Soyez le premier à évaluer!
Ce commentaire a été minimisé par le modérateur sur le site
Merci pour le code sur la combinaison de fichiers. Je veux cependant avoir les multiples fichiers dans le classeur avec lequel je travaille actuellement, pas pour que le code crée un nouveau classeur. Comment faire pour y parvenir ?
Marie
Ce commentaire a été minimisé par le modérateur sur le site
Merci d'avoir partagé ce code. C'est exactement ce que je cherchais. Malheureusement, cela ne fonctionne pas aussi bien que je l'espérais. Je reçois un message d'erreur à chaque exécution du code. ERREUR : "Le nom est déjà pris. Essayez-en un autre." Remarques : - J'essaie de combiner quatre fichiers csv - Tous les fichiers csv ont le même nom "file_name.csv, file_name(1).csv, etc..." Le code combine les deux premiers fichiers csv en un seul classeur et le troisième fichier dans son propre classeur. Le quatrième fichier n'a jamais eu de chance à cause de l'erreur. Si quelqu'un a des idées sur la façon de résoudre ce problème, j'apprécierais grandement vos commentaires. Merci à tous d'avance pour votre temps. Cordialement, André
Andrew
Ce commentaire a été minimisé par le modérateur sur le site
Merci! Le code était très utile
Amit
Ce commentaire a été minimisé par le modérateur sur le site
Merci . Très utile
Rohit
Ce commentaire a été minimisé par le modérateur sur le site
Merci. Le code fonctionne bien
Duong
Ce commentaire a été minimisé par le modérateur sur le site
Bonjour, cette macro vba est géniale, mais je veux qu'elle soit lancée par un clic sur un bouton sur un autre classeur, comment puis-je faire cela?
GUEST
Il n'y a pas encore de commentaires postés ici
Laisser vos commentaires
Publier en tant qu'invité
×
Évaluez cet article:
0  Personnages
Emplacements suggérés