Šajā pamācībā es dalīšos ar jums 5 piemēroti veidi, kā saglabāt Excel faila kopiju XLSX formātā, izmantojot VBA . Šīs metodes var izmantot jebkura veida darbgrāmatā neatkarīgi no tā, vai tajās ir lieli vai mazi dati. Tā kā mēs izmantosim arī VBA , uzdevuma izpildei praktiski nebūs nepieciešams laiks.

Lejupielādēt Practice Workbook

Prakses darba burtnīcu varat lejupielādēt no šejienes.

Kas ir XLSX fails?

Portāls XLSX fails ir MS Excel Atvērt XML formāta izklājlapu kurā dati tiek glabāti šūnās, kas atrodas darblapās. Šūnas ir sakārtotas rindas un kolonnas struktūrā. In MS Excel 2007 un agrāk šis izklājlapas fails bija šāda tipa XLS .

5 piemēroti veidi, kā saglabāt Excel faila kopiju kā XLSX, izmantojot VBA

Šajā pamācībā mūsu galvenais mērķis ir parādīt, kā saglabāt pašreizējo darbgrāmatu. XLSX Tātad mēs esam izmantojuši vienkāršu un kodolīgu datu kopu, kurā ir 3 kolonnas un 6 skolēnu atzīmju ieraksti. Bet jums ir iespēja izmantot savas datu kopas.

1. Izmantojot metodi SaveCopyAs

Metode SaveCopyAs vietnē Excel VBA ņem darbgrāmatas objektu un var saglabāt jaunu šīs darbgrāmatas kopiju. XLSX formātā, nemainot datus. Apskatīsim, kā izmantot šo metodi mūsu kodā.

Soļi:

• Vispirms dodieties uz Izstrādātājs cilni un izvēlieties Visual Basic .

• Tālāk, sadaļā Visual Basic logā noklikšķiniet uz Ievietot un izvēlieties Modulis .

• Tagad jaunā moduļa logā labajā pusē ievadiet šādu formulu:

 Sub SaveCopyAs_Method() Application.DisplayAlerts = False ActiveWorkbook.SaveCopyAs "C:\Users\USER\Desktop\5700\SaveCopyAs method.xlsx" End Sub 

• Pēc tam aizveriet VBA logu un pāriet uz Izstrādātājs atkal cilne.
• Šajā sadaļā izvēlieties Makroprocesori .

• Tagad Makro logā redzēsiet ievietoto makrokodu.
• Pēc tam noklikšķiniet uz Palaist .

• Visbeidzot atveriet mapi, kurā saglabājāt failu, un tam jābūt pieejamam sadaļā XLSX formātā, kā mēs vēlējāmies.

Uzziniet vairāk: Kā saglabāt Excel makro failus kā faila nosaukumu no šūnas vērtības

2. Datnes nosaukuma norādīšana

Mēs varam saglabāt Excel faila kopiju programmā XLSX formātā, norādot faila nosaukumu VBA Nosakot faila nosaukumu, mēs pievienosim arī faila paplašinājumu, kas pārveidos failu mūsu vēlamajā formātā. Lai turpinātu izmantot šo metodi, ievietojiet turpmāk norādīto kodu. VBA moduļa logs.

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

Pēc koda ievadīšanas vienkārši palaidiet to no Makroprocesori opciju, kā mēs parādījām iepriekš. Tagad dodieties uz saglabāšanas mapi un failu ar XLSX formāts būtu jābūt tagad.

Lasīt vairāk: Excel VBA, lai saglabātu darbgrāmatu noteiktā mapē ar datumu

3. Failu formāta numura ievadīšana

Faila formāta numuri ir unikāli numuri, kas, saglabājot failu, apzīmē konkrētu faila tipu. Šajā pamācībā mūsu mērķis ir saglabāt Excel kopiju kā faila tipu. XLSX failu, izmantojot VBA . Tātad mēs izmantosim formāta numuru 51 , kas apzīmē XLSX faila tips. Tātad, ievadiet šādu kodu. VBA modulis:

 Sub file_format_number() Dim location As String Application.DisplayAlerts = False location = "C:\Users\USER\Desktop\5700\Failu formāta numurs" ActiveWorkbook.SaveAs Filename:=location, FileFormat:=51 End Sub 

Tagad, ja palaidīsiet šo kodu, Excel nekavējoties saglabās darbgrāmatu. XLSX formātu. To var apstiprināt, pārbaudot galamērķa mapē.

Lasīt vairāk: Excel VBA Saglabāt kā faila formātu (12 piemēroti piemēri)

4. Saglabāt ar paroli

Daudzos gadījumos ir ļoti svarīgi saglabāt Excel darbgrāmatas kopiju. XLSX Tas jo īpaši attiecas uz darbgrāmatām, kurām ir augsta drošības pakāpe. Šo uzdevumu var ļoti viegli paveikt, izmantojot VBA un pielāgotas paroles iestatīšana līdztekus dokumenta saglabāšanai. Šim nolūkam ievadiet tālāk norādīto VBA kods Modulis logs:

 Sub Save_With_Password() Application.DisplayAlerts = False ActiveWorkbook.SaveAs _ Filena nosaukums:="C:\Users\USER\Desktop\5700\Save with password.xlsx", Parole:="viens" End Sub 

Visbeidzot, kā redzējām iepriekš, jums vienkārši ir jāpalaiž šis kods no Makroprocesori opcijas. Tagad, ja atverat saglabāto mapi, tajā jāatrod fails ar jūsu norādīto nosaukumu un XLSX pagarinājums beigās.

Lasīt vairāk: Excel VBA: saglabājiet lapu kā jaunu darbgrāmatu bez atvēršanas

5. Ietaupiet, iesakot tikai lasīt

Ne tik stingrs veids, kā aizsargāt dokumentu, ir padarīt to par tikai lasīšanai paredzētu failu. Ja Excel faila kopiju saglabājat failā. XLSX formātā, tad varat iestatīt tikai lasīšanai paredzētu nosacījumu, izmantojot VBA . Tagad, lai to izdarītu, ievietojiet šādu kodu. VBA modulis:

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

Pēc tam palaidiet šo kodu no Makroprocesori opciju sadaļā Izstrādātājs cilnē. Šādi vajadzētu saglabāt XLSX pašreizējās darbgrāmatas kopiju, kā parādīts turpmāk.

Lasīt vairāk: Excel VBA, lai saglabātu failu ar mainīgo nosaukumu (5 piemēri)

Lietas, kas jāatceras

• Pārliecinieties, ka ir jāmaina saglabāšanas ceļš XLSX failu VBA . Tam jāatbilst mapes ceļam jūsu datorā.
• Divreiz pārbaudiet, vai rakstāt visus iebūvētos vārdus. VBA darbojas tieši tā, kā es esmu darījis.
• Atcerieties, ka dažos gadījumos VBA kods var vairs nebūt pieejams. VBA logu pēc koda palaišanas.

Secinājums

Es ceru, ka metodes, ko es parādīju, lai saglabātu Excel faila kopiju programmā XLSX formātā, izmantojot VBA jums bija noderīgi. Ja jūs iestrēgstat kādā no soļiem vai kāds kods nedarbojas, tad es ieteiktu dažas reizes pārbaudīt manis sniegtos kodus. Tāpat pamēģiniet zināmā mērā mainīt kodu, lai saprastu, ko kods dara. Visbeidzot, lai uzzinātu vairāk. Excel metodes, sekojiet mūsu ExcelWIKI Ja jums ir kādi jautājumi, lūdzu, dariet man zināmu komentāros.