In deze handleiding ga ik met u delen 5 geschikte manieren om een kopie van een excel-bestand op te slaan in XLSX formaat met behulp van VBA U kunt deze methoden in elk type werkmap gebruiken, of ze nu grote of kleine gegevens bevatten. En omdat we gebruik gaan maken van VBA zal het vrijwel geen tijd kosten om de taak te volbrengen.

Download Praktijk Werkboek

U kunt het oefenwerkboek hier downloaden.

Wat is een XLSX-bestand?

De XLSX bestand is een MS Excel Open XML-formaat spreadsheet dat gegevens opslaat in cellen die zich in werkbladen bevinden. De cellen zijn gerangschikt in een rij-kolom structuur. In MS Excel 2007 en eerder was dit spreadsheetbestand van het type XLS .

5 geschikte manieren om een kopie van een Excel-bestand op te slaan als XLSX met behulp van VBA

In deze tutorial willen we u vooral laten zien hoe u een huidige werkmap opslaat in een XLSX formaat. We hebben dus een eenvoudige en beknopte dataset genomen die 3 kolommen en 6 Maar u kunt uw eigen datasets gebruiken.

1. De methode SaveCopyAs gebruiken

De methode SaveCopyAs in Excel VBA neemt een werkboekobject en kan een nieuwe kopie van dit werkboek opslaan in een XLSX Laten we eens kijken hoe we deze methode in onze code kunnen gebruiken.

Stappen:

• Ga eerst naar de Ontwikkelaar tabblad en selecteer Visual Basic .

• Vervolgens, in de Visual Basic venster, klik op Plaats en selecteer Module .

• Typ nu in het nieuwe modulevenster rechts de volgende formule:

 Sub SaveCopyAs_Method() Application.DisplayAlerts = False ActiveWorkbook.SaveCopyAs "C:^^UsersDesktop\5700SaveCopyAs method.xlsx" End Sub 

• Sluit vervolgens de VBA venster en navigeer naar de Ontwikkelaar opnieuw.
• Selecteer hier Macro's .

• Nu, in de Macro venster, zou je de macrocode moeten zien die we hebben ingevoegd.
• Klik vervolgens op Ren .

• Open tenslotte de map waarin u het bestand hebt opgeslagen en het zou beschikbaar moeten zijn in de XLSX formaat als we wilden.

Lees meer: Hoe Excel Macro bestanden op te slaan als bestandsnaam van celwaarde

2. Bestandsnaam opgeven

We kunnen een kopie van een excel-bestand opslaan in XLSX formaat door de bestandsnaam op te geven in de VBA code. Bij het instellen van de bestandsnaam voegen we ook de bestandsextensie toe die het bestand zal converteren naar het door ons gewenste formaat. Om verder te gaan met deze methode voegt u de onderstaande code in de VBA modulevenster.

 Sub Specify_file_name() Dim location As String location = "C:\Users\Desktop\5700\Specify file name.xlsx" ActiveWorkbook.SaveAs Bestandsnaam:=locatie End Sub 

Nadat u de code hebt getypt, voert u deze gewoon uit vanuit de Macro's optie zoals we eerder lieten zien. Ga nu naar de bewaarmap en het bestand met de XLSX formaat zou er nu moeten zijn.

Lees meer: Excel VBA om werkmap op te slaan in specifieke map met datum

3. Bestandsformaatnummer invoeren

De bestandsformaatnummers zijn unieke nummers die tijdens het opslaan een specifiek bestandstype aanduiden. Voor deze tutorial is het de bedoeling een excel-kopie op te slaan als een XLSX bestand met behulp van VBA Dus gebruiken we het formaat nummer 51 die de XLSX Dus, typ de volgende code in de VBA module:

 Sub file_format_number() Dim location As String Application.DisplayAlerts = False location = "C:\Users\Desktop\00File format number" ActiveWorkbook.SaveAs Filename:=locatie, FileFormat:=51 End Sub 

Nu, als je deze code uitvoert, zal Excel onmiddellijk de werkmap opslaan in een XLSX formaat. U kunt dat bevestigen door in de doelmap te controleren.

Lees meer: Excel VBA Opslaan als bestandsformaat (12 geschikte voorbeelden)

4. Opslaan met wachtwoord

In veel gevallen is het erg belangrijk om een kopie van een Excel-werkmap op te slaan in XLSX formaat met een extra wachtwoord. Dit geldt vooral voor werkmappen met een hoog beveiligingsniveau. U kunt deze taak heel eenvoudig uitvoeren met behulp van VBA en het instellen van een aangepast wachtwoord naast het opslaan van uw document. Voer daarvoor het volgende in VBA code in de Module raam:

 Sub Opslaan_Met_Wachtwoord() Application.DisplayAlerts = False ActiveWorkbook.SaveAs _ Bestandsnaam:="C:\Users\Desktop5700Opslaan met wachtwoord.xlsx", Wachtwoord:="één" Einde Sub 

Tot slot, zoals we eerder zagen, hoef je deze code alleen maar uit te voeren vanuit de Macro's opties. Als u nu naar uw opgeslagen map gaat, zou u het bestand moeten vinden met de naam die u gaf en de XLSX uitbreiding aan het einde.

Lees meer: Excel VBA: Blad opslaan als nieuwe werkmap zonder te openen

5. Bespaar door alleen lezen aan te bevelen

Een minder strikte manier om een document te beveiligen is om er een alleen-lezen bestand van te maken. Als u een kopie van een excel-bestand opslaat in de XLSX formaat, dan kunt u de alleen-lezen voorwaarde instellen met behulp van VBA Om dit te doen voegt u de volgende code in de VBA module:

 Sub recommend_read_only() Application.DisplayAlerts = False ActiveWorkbook.SaveAs _ Filename:="C:\Users\Desktop\5700Recommend read only.xlsx", _ ReadOnlyRecommended:=True End Sub 

Voer dan deze code uit vanuit de Macro's optie onder de Ontwikkelaar tabblad. Dit zou een XLSX kopie van de huidige werkmap zoals hieronder getoond.

Lees meer: Excel VBA om bestand met variabele naam op te slaan (5 voorbeelden)

Dingen om te onthouden

• Zorg ervoor dat u het opslagpad van de XLSX bestand in de VBA Het moet overeenkomen met een folderpad in uw computer.
• Controleer dubbel om te zien of je alle ingebouwde VBA werkt precies zoals ik heb gedaan.
• Vergeet niet dat in sommige gevallen de VBA code is misschien niet meer beschikbaar in de VBA na het uitvoeren van de code.

Conclusie

Ik hoop dat de methoden die ik liet zien om een excel-bestand te kopiëren in XLSX formaat met behulp van VBA waren nuttig voor u. Als u vastloopt in een van de stappen of een code werkt niet, dan stel ik voor de codes die ik heb gegeven een paar keer te controleren. Probeer ook de code enigszins te veranderen om te begrijpen wat de code doet. Ten slotte, om meer te leren excel technieken, volg onze ExcelWIKI website. Als je vragen hebt, laat het me weten in het commentaar.