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
- Converteer meerdere xls-indelingen tegelijk naar xlsx-indelingen met VBA-code
- Converteer meerdere xls-formaten tegelijk naar xlsx-formaten met een krachtige functie
- Converteer meerdere werkmappen tegelijk naar PDF-bestanden
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 Bespaar knop om het dialoogvenster te sluiten, en dit Excel-formaat is geconverteerd van xls naar xlsx.
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.
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:
- 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:
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
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!