Passer au contenu principal

Comment convertir plusieurs fichiers xls en fichiers xlsx dans Excel?

Pour convertir un ancien fichier Excel xls en un nouveau fichier xlsx, vous pouvez appliquer la fonctionnalité Enregistrer sous dans Excel, mais, s'il y a plusieurs fichiers xls à convertir, comment pourrait-il gérer cette tâche rapidement et facilement?


Convertissez plusieurs formats xls en formats xlsx avec la fonction Enregistrer sous un par un

La fonction Enregistrer sous dans Excel peut vous aider à convertir un par un le format xls de l'ancien classeur au nouveau format xlsx.

1. Ouvrez votre classeur dont vous souhaitez convertir son format.

2Cliquez sur Déposez votre dernière attestation > Enregistrer sousEt un Enregistrer sous s'affiche, spécifiez un dossier pour placer le nouveau format du fichier, puis cliquez sur Enregistrer en tant que type de liste déroulante pour choisir Excel, voir capture d'écran:

3. Puis clique Épargnez bouton pour fermer la boîte de dialogue, et ce format Excel a été converti de xls en xlsx.

Pourboires: Avec ça Enregistrer sous fonction, vous ne convertissez qu'un seul fichier Excel à la fois, si vous avez des centaines de fichiers Excel à convertir, cette méthode n'est pas un bon choix.

Convertissez plusieurs formats xls en formats xlsx à la fois avec le code VBA

Si vous souhaitez convertir plusieurs fichiers xls en fichiers xlsx à la fois sans les enregistrer un par un, ici, je vais parler d'un code VBA pour vous, veuillez suivre les étapes suivantes:

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

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

Code VBA: Convertissez plusieurs formats xls en formats xlsx à la fois

Sub ConvertToXlsx()
'Updateby Extendoffice
Dim strPath As String
Dim strFile As String
Dim xWbk As Workbook
Dim xSFD, xRFD As FileDialog
Dim xSPath As String
Dim xRPath As String
Set xSFD = Application.FileDialog(msoFileDialogFolderPicker)
With xSFD
.Title = "Please select the folder contains the xls files:"
.InitialFileName = "C:\"
End With
If xSFD.Show <> -1 Then Exit Sub
xSPath = xSFD.SelectedItems.Item(1)
Set xRFD = Application.FileDialog(msoFileDialogFolderPicker)
With xRFD
.Title = "Please select a folder for outputting the new files:"
.InitialFileName = "C:\"
End With
If xRFD.Show <> -1 Then Exit Sub
xRPath = xRFD.SelectedItems.Item(1) & "\"
strPath = xSPath & "\"
strFile = Dir(strPath & "*.xls")
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Do While strFile <> ""
If Right(strFile, 3) = "xls" Then
Set xWbk = Workbooks.Open(Filename:=strPath & strFile)
xWbk.SaveAs Filename:=xRPath & strFile & "x", _
FileFormat:=xlOpenXMLWorkbook
xWbk.Close SaveChanges:=False
End If
strFile = Dir
Loop
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub

3. Puis appuyez F5 clé pour exécuter ce code, et une fenêtre s'affichera, veuillez sélectionner un dossier contenant les fichiers xls que vous souhaitez convertir, voir capture d'écran:

4. Puis clique OK, une autre fenêtre apparaît, veuillez sélectionner un chemin de dossier dans lequel vous souhaitez sortir les nouveaux fichiers convertis, voir capture d'écran:

5. Et puis, clique OK, après avoir terminé la conversion, vous pouvez accéder au dossier spécifié pour prévisualiser le résultat converti, voir les captures d'écran:


Convertissez plusieurs formats xls en formats xlsx à la fois avec une fonctionnalité puissante

Avec ça Kutools for Excel's Convertisseur de format utilitaire, vous pouvez convertir plusieurs formats xls en formats xlsx ou vice versa, il peut également vous aider à convertir plusieurs classeurs en fichiers PDF en un seul.

Remarque:Appliquer cette Convertisseur de format, tout d'abord, vous devez télécharger le Kutools for Excel, puis appliquez la fonction rapidement et facilement.

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

1Cliquez sur Kutools Plus > Classeur > Convertisseur de format, voir capture d'écran:

2. Et une boîte de dialogue apparaîtra pour vous rappeler que vous devez fermer le classeur que vous souhaitez convertir. Voir la capture d'écran:

3Cliquez sur OK, alors, dans le Convertisseur de format de fichier boîte de dialogue, spécifiez les options suivantes:

  • En vertu des Normes sur l’information et les communications, les organismes doivent rendre leurs sites et applications Web accessibles. Ils y parviennent en conformant leurs sites Web au niveau AA des Web Content Accessibility Guidelines (WCAG). Convertir le type liste déroulante, sélectionnez Excel 97-2003 vers Excel 2007 ou supérieur;
  • Puis clique Ajouter bouton pour ajouter les fichiers xls que vous souhaitez convertir, vous pouvez ajouter les classeurs à partir de votre disque d'ordinateur ou OneDrive selon vos besoins;

4. Après avoir inséré les fichiers xls, toujours dans le Convertisseur de format de fichier boîte de dialogue, veuillez cliquer bouton pour choisir un chemin de dossier pour sortir les fichiers convertis, puis spécifiez certaines opérations dont vous avez besoin au bas de la boîte de dialogue, voir capture d'écran:

Notes: Dans la boîte de dialogue ci-dessus:
  • Si les classeurs des sous-dossiers devaient également être convertis, veuillez vérifier le Inclure les sous-dossiers lors de l'ajout de dossiers case à cocher;
  • Si vous souhaitez supprimer les fichiers d'origine après la conversion, veuillez vérifier le Supprimer les fichiers source après la conversion boîte;
  • Si vous souhaitez conserver la date de modification des fichiers originaux, veuillez cocher la case Conserver la date de modification des fichiers originaux boîte;
  • La structure des répertoires du fichier peut être conservée en vérifiant La structure des répertoires du fichier est conservée lors de la conversion boîte;

5. Puis clique OK pour commencer la conversion, après avoir terminé la conversion, vous pouvez accéder au dossier spécifique pour prévisualiser le résultat converti. Voir les captures d'écran:

Meilleurs outils de productivité bureautique

🤖 Aide à l'IA Kutools: Révolutionner l'analyse des données en s'appuyant sur : Exécution intelligente   |  Générer du code  |  Créer des formules personnalisées  |  Analyser les données et générer des graphiques  |  Invoquer les fonctions Kutools...
Caractéristiques populaires: Rechercher, mettre en évidence ou identifier les doublons   |  Supprimer les lignes vides   |  Combinez des colonnes ou des cellules sans perdre de données   |   Tour sans formule 
Super recherche: VSearchup à critères multiples    VSearch à valeurs multiples  |   Recherche virtuelle sur plusieurs feuilles   |   Recherche floue ....
Liste déroulante avancée: Créez rapidement une liste déroulante   |  Liste déroulante dépendante   |  Liste déroulante à sélection multiple ....
Gestionnaire de colonnes: Ajouter un nombre spécifique de colonnes  |  Déplacer les colonnes  |  Basculer l'état de visibilité des colonnes masquées  |  Comparer les plages et les colonnes 
Caractéristiques en vedette: Mise au point de la grille   |  Voir Design   |   Grande barre de formule    Gestionnaire de classeurs et de feuilles   |  Centre de ressources (Texte automatique)   |  Sélecteur de date   |  Combiner des feuilles de travail   |  Crypter/déchiffrer les cellules    Envoyer des e-mails par liste   |  Super filtre   |   Filtre spécial (filtre gras/italique/barré...) ...
Les 15 meilleurs ensembles d'outils12 Texte Outils (Ajouter du texte, Supprimer les caractères, ...)   |   50+ Graphique Types (Diagramme de Gantt, ...)   |   40+ Pratique Formules (Calculer l'âge en fonction de l'anniversaire, ...)   |   19 Insertion Outils (Insérer le code QR, Insérer une image à partir du chemin, ...)   |   12 Conversion Outils (Nombres en mots, Conversion des devises, ...)   |   7 Fusionner et fractionner Outils (Lignes de combinaison avancées, Cellules divisés, ...)   |   ... et plus

Améliorez vos compétences Excel avec Kutools for Excel et faites l'expérience d'une efficacité comme jamais auparavant. Kutools for Excel offre plus de 300 fonctionnalités avancées pour augmenter la productivité et gagner du temps.  Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...

Description


Office Tab apporte une interface à onglets à Office et facilite grandement 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!
Comments (4)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Please could you change the VBA code so that it looks in subfolders of the chosen folder.
Could it also output a log file to show everything its converted?
This comment was minimized by the moderator on the site
Thank You!
This comment was minimized by the moderator on the site
Thanks so much for the VBA CODE. Very Useful
This comment was minimized by the moderator on the site
Can you save a xls as a xlsx and maintain 1,048,576 rows and XFD Columns?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations