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

Hoe converteer ik meerdere xls-bestanden naar xlsx-bestanden in Excel?

Om een ​​oud xls Excel-bestand naar een nieuw xlsx-bestand te converteren, kunt u de functie Opslaan als in Excel toepassen, maar als er meerdere xls-bestanden moeten worden geconverteerd, hoe kan deze taak dan snel en gemakkelijk worden uitgevoerd?


Converteer meerdere xls-indelingen naar xlsx-indelingen met de functie Opslaan als één voor één

Met de functie Opslaan als in Excel kunt u het xls-formaat van de oude werkmap een voor een naar het nieuwe xlsx-formaat converteren.

1. Open uw werkmap waarvan u de indeling wilt converteren.

2. Klikken Dien in > Opslaan alsEn een Opslaan als dialoogvenster wordt weergegeven, specificeer een map om het nieuwe formaat van het bestand te plaatsen en klik vervolgens op Opslaan als type vervolgkeuzelijst om te kiezen Excel-werkmap, zie screenshot:

3. Dan klikken Opslaan knop om het dialoogvenster te sluiten, en dit Excel-formaat is geconverteerd van xls naar xlsx.

Tips: Hiermee Opslaan als functie, converteer je slechts één Excel-bestand per keer, als je honderden Excel-bestanden moet converteren, is deze methode geen goede keuze.

Converteer meerdere xls-indelingen tegelijk naar xlsx-indelingen met VBA-code

Als je meerdere xls-bestanden tegelijk naar xlsx-bestanden wilt converteren zonder ze een voor een op te slaan, zal ik het hier hebben over een VBA-code voor je, doe dit met de volgende stappen:

1. Houd de ALT + F11 toetsen om de te openen Microsoft Visual Basic voor toepassingen venster.

2. Klikken Invoegen > Moduleen plak de volgende code in het Module Venster.

VBA-code: converteer meerdere xls-indelingen tegelijk naar xlsx-indelingen

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. Druk vervolgens op F5 sleutel om deze code uit te voeren, en er wordt een venster weergegeven.Selecteer een map die de xls-bestanden bevat die u wilt converteren, zie screenshot:

4. Dan klikken OK, er verschijnt een ander venster, selecteer een mappad waar u de nieuwe geconverteerde bestanden naar wilt uitvoeren, zie screenshot:

5. En dan, klik OK, na het voltooien van de conversie, kunt u naar de opgegeven map gaan om een ​​voorbeeld van het geconverteerde resultaat te bekijken, zie screenshots:


Converteer meerdere xls-formaten tegelijk naar xlsx-formaten met een krachtige functie

Met deze Kutools for Excel's Format Converter hulpprogramma, kunt u meerdere xls-indelingen naar xlsx-indelingen converteren of omgekeerd, het kan u ook helpen meerdere werkmappen in één keer naar PDF-bestanden te converteren.

Opmerking:Om dit toe te passen Format Converter, ten eerste moet u het Kutools for Excelen pas de functie vervolgens snel en gemakkelijk toe.

Na het installeren van Kutools for Excel, doe dit als volgt:

1. Klikken Koetools Plus > werkboek > Format Converter, zie screenshot:

2. En er verschijnt een promptvenster om u eraan te herinneren dat u de werkmap die u wilt converteren, moet sluiten. Zie screenshot:

3. Klikken OKen vervolgens in de Bestandsformaat Converter dialoogvenster, specificeer de volgende opties:

  • Onder de Type omzetten vervolgkeuzelijst, selecteer Excel 97-2003 naar Excel 2007 of hoger;
  • Dan klikken Toevoegen knop om de xls-bestanden toe te voegen die u wilt converteren, u kunt de werkmappen van uw computerschijf of OneDrive naar behoefte toevoegen;

4. Na het invoegen van de xls-bestanden, nog steeds in het Bestandsformaat Converter dialoogvenster, klik dan knop om een ​​mappad te kiezen om de geconverteerde bestanden uit te voeren, en specificeer vervolgens enkele bewerkingen die u nodig hebt onderaan het dialoogvenster, zie screenshot:

Opmerkingen: In het bovenstaande dialoogvenster:
  • Als de werkmappen in de submappen ook moesten worden geconverteerd, controleer dan het Neem submappen op bij het toevoegen van mappen selectievakje;
  • Als u de originele bestanden na het converteren wilt verwijderen, vinkt u het Verwijder bronbestanden na conversie doos;
  • Als u de gewijzigde datum van originele bestanden wilt behouden, controleer dan het Bewaar de gewijzigde datum van originele bestanden doos;
  • De directorystructuur van het bestand kan worden behouden door de De directorystructuur van het bestand blijft behouden tijdens de conversie doos;

5. Dan klikken OK Om te beginnen met converteren, kunt u na het voltooien van de conversie naar de specifieke map gaan om een ​​voorbeeld van het geconverteerde resultaat te bekijken. Zie screenshots:


De beste tools voor kantoorproductiviteit

Kutools voor Excel lost de meeste van uw problemen op en verhoogt uw productiviteit met 80%

  • visfuik: Snel invoegen complexe formules, grafieken en alles wat je eerder hebt gebruikt; Versleutel cellen met wachtwoord; Maak een mailinglijst en stuur e-mails ...
  • Super Formula-balk (bewerk eenvoudig meerdere regels tekst en formule); Lay-out lezen (gemakkelijk grote aantallen cellen lezen en bewerken); Plakken in gefilterd bereik...
  • Voeg cellen / rijen / kolommen samen zonder gegevens te verliezen; Gespleten cellen inhoud; Combineer dubbele rijen / kolommen... Voorkom dubbele cellen; Vergelijk Ranges...
  • Selecteer Dupliceren of Uniek Rijen; Selecteer lege rijen (alle cellen zijn leeg); Super zoeken en fuzzy zoeken in veel werkboeken; Willekeurige selectie ...
  • Exacte kopie Meerdere cellen zonder de formuleverwijzing te wijzigen; Maak automatisch verwijzingen naar meerdere bladen; Plaats kogels, Selectievakjes en meer ...
  • Extraheer tekst, Tekst toevoegen, Verwijderen op positie, Ruimte verwijderen; Paging-subtotalen maken en afdrukken; Converteren tussen celinhoud en opmerkingen...
  • Super filter (bewaar en pas filterschema's toe op andere bladen); Geavanceerd sorteren per maand / week / dag, frequentie en meer; Speciaal filter door vet, cursief ...
  • Combineer werkmappen en werkbladen; Tabellen samenvoegen op basis van sleutelkolommen; Gegevens splitsen in meerdere bladen; Batch Converteer xls, xlsx en PDF...
  • Meer dan 300 krachtige functies. Ondersteunt Office / Excel 2007-2021 en 365. Ondersteunt alle talen. Eenvoudig te implementeren in uw onderneming of organisatie. Volledige functies Gratis proefperiode van 30 dagen. 60 dagen geld-terug-garantie.
kte tabblad 201905

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!
officetab onderkant
Comments (2)
Nog geen beoordelingen. Beoordeel als eerste!
Deze opmerking is gemaakt door de moderator op de site
Kun je een xls opslaan als een xlsx en 1,048,576 rijen en XFD-kolommen behouden?
Deze opmerking is gemaakt door de moderator op de site
Heel erg bedankt voor de VBA-CODE. Zeer nuttig
Er zijn nog geen reacties geplaatst
Laat uw commentaar
Posten als gast
×
Beoordeel dit bericht:
0   Personages
Voorgestelde locaties

Volg ons

Copyright © 2009 - www.extendoffice.com. | Alle rechten voorbehouden. Aangedreven door ExtendOffice. | Sitemap
Microsoft en het Office-logo zijn handelsmerken of gedeponeerde handelsmerken van Microsoft Corporation in de Verenigde Staten en / of andere landen.
Beschermd door Sectigo SSL