Comment combiner / importer plusieurs fichiers CSV dans plusieurs feuilles de calcul ?
Si vous souhaitez importer plusieurs fichiers CSV d'un dossier en tant que feuilles de calcul distinctes dans un classeur, comment pourriez-vous gérer cette tâche dans Excel ?
Importer plusieurs fichiers CSV dans des feuilles de calcul distinctes avec du code VBA
Importer plusieurs fichiers CSV dans des feuilles de calcul distinctes avec Kutools pour Excel
Diviser un classeur en plusieurs fichiers CSV / PDF / TXT / Excel séparés
Importer plusieurs fichiers CSV dans des feuilles de calcul distinctes avec du code VBA
Pour importer rapidement plusieurs fichiers CSV dans un classeur, le code VBA suivant peut vous aider, veuillez procéder comme suit :
1. Maintenez les touches ALT + F11 enfoncées dans Excel pour ouvrir la fenêtre Microsoft Visual Basic for Applications.
2. Cliquez sur Insérer > Module, puis collez le code suivant dans la fenêtre Module.
Code VBA : Importer 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. Appuyez ensuite sur la touche F5 pour exécuter ce code, une fenêtre apparaîtra, accédez au dossier spécifique et sélectionnez les fichiers CSV que vous souhaitez importer dans Excel, voir capture d'écran :
4. Cliquez ensuite sur le bouton Ouvrir, les fichiers CSV sélectionnés ont été importés sous forme de feuilles de calcul distinctes dans un nouveau classeur.
5. Enfin, vous pouvez enregistrer le nouveau classeur selon vos besoins.
Importer plusieurs fichiers CSV dans des feuilles de calcul distinctes avec Kutools pour Excel
Si vous avez Kutools pour Excel, avec son outil puissant - Consolider, vous pouvez rapidement combiner ou importer plusieurs fichiers CSV dans une seule feuille de calcul ou plusieurs feuilles de calcul distinctes selon vos besoins.
Après avoir installé Kutools pour Excel, veuillez procéder comme suit :
1. Cliquez sur Kutools Plus > Consolider, voir capture d'écran :
2. Dans la boîte de dialogue Fusionner les feuilles de calcul, sélectionnez Copier des feuilles de calcul de plusieurs classeurs vers un seul classeur, voir capture d'écran :
3. À l'étape 2 de l'assistant, cliquez sur Ajouter > Fichier pour choisir les fichiers CSV que vous souhaitez fusionner, voir capture d'écran :
4. Dans la boîte de dialogue Ouvrir qui s'affiche, sélectionnez (*.csv) dans la liste déroulante, puis spécifiez les fichiers CSV que vous souhaitez fusionner.
5. Cliquez ensuite sur le bouton Ouvrir, et vos fichiers CSV sélectionnés ont été importés dans la boîte de dialogue, voir capture d'écran :
6. À l'étape 3, veuillez effectuer les opérations suivantes :
(1.) Cochez Dans la première ligne de chaque feuille de calcul (en tant que commentaires) dans la section Ajouter des informations de feuille de calcul, toutes les informations des 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 vides lorsque vous rencontrez un fichier CSV vide.
7. Cliquez ensuite sur le bouton Terminer, et après avoir terminé la consolidation, vous pouvez spécifier un nom de fichier et un emplacement pour votre nouveau classeur consolidé. Voir capture d'écran :
8. Cliquez ensuite sur le bouton Enregistrer, dans la boîte de dialogue qui apparaît, vous pouvez ouvrir le nouveau fichier en cliquant sur Oui, et le fermer en cliquant sur Non, voir capture d'écran :
9. Ensuite, vous pouvez enregistrer ou non ce scénario comme vous le souhaitez. Voir capture d'écran :
10. Enfin, vos fichiers CSV sélectionnés ont été importés dans un nouveau classeur avec des feuilles de calcul séparées, voir capture d'écran :
Téléchargez et essayez gratuitement Kutools pour Excel dès maintenant !
Diviser un classeur en plusieurs fichiers CSV / PDF / TXT / Excel séparés
Dans certains cas, vous souhaiterez peut-être diviser un classeur en fichiers CSV séparés, l'utilitaire Diviser le classeur de Kutools pour Excel peut accomplir cette tâche rapidement et facilement.
Après avoir installé Kutools pour Excel, veuillez procéder comme suit :
1. Cliquez sur Kutools Plus > Classeur > Diviser le classeur, voir capture d'écran :
2. Dans la boîte de dialogue Diviser le classeur :
(1.) Cochez les feuilles de calcul que vous souhaitez diviser ;
(2.) Et cochez Spécifier le format de sauvegarde, puis choisissez le format de fichier dans lequel vous souhaitez enregistrer ;
(3.) Cliquez ensuite sur le bouton Diviser, et spécifiez un dossier pour placer les fichiers séparés.
3. Cliquez ensuite sur OK pour commencer à diviser, le classeur sera divisé en fichiers CSV distincts dont vous avez besoin.
Téléchargez et essayez gratuitement Kutools pour Excel dès maintenant !
Meilleurs outils de productivité pour Office
Boostez vos compétences Excel avec Kutools pour Excel, et découvrez une efficacité sans précédent. Kutools pour Excel propose plus de300 fonctionnalités avancées pour augmenter la productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte une interface à onglets à Office, et facilite grandement votre travail
- Activez la modification 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é de50 %, et réduit des centaines de clics de souris pour vous chaque jour !