Kuidas salvestada koopia XLSX-i abil Exceli VBA (5 sobivat viisi)

  • Jaga Seda
Hugh West

Selles õpetuses jagan ma teiega järgmist 5 sobivad viisid excel-faili koopia salvestamiseks aastal XLSX formaat, kasutades VBA Neid meetodeid saab kasutada mis tahes tüüpi töövihikus, olenemata sellest, kas need sisaldavad suuri või väikeseid andmeid. Samuti, kuna me kasutame VBA , ei võta see praktiliselt aega.

Lae alla praktiline töövihik

Praktilise töövihiku saate alla laadida siit.

VBA Salvesta koopia kui XLSX.xlsx

Mis on XLSX-faili?

The XLSX fail on MS Exceli avatud XML-formaadis tabel mis salvestab andmeid lahtritesse, mis asuvad töölehtede sees. Lahtrid on paigutatud rida-veergude struktuuri. In MS Excel 2007 ja varem oli see tabelifail tüüpi XLS .

5 sobivat viisi Exceli faili koopia salvestamiseks XLSX-na VBA abil

Selle õpetuse puhul on meie peamine eesmärk näidata, kuidas salvestada praegune töövihik ühes XLSX Seega oleme võtnud lihtsa ja ülevaatliku andmekogumi, mis on 3 veerud ja 6 õpilaste hindeid. Kuid teil on võimalus kasutada oma andmekogumeid.

1. Meetodi SaveCopyAs kasutamine

SaveCopyAs meetod aadressil Excel VBA võtab töövihiku objekti ja võib salvestada selle töövihiku uue koopia ühes XLSX formaadis ilma andmeid muutmata. Vaatame, kuidas seda meetodit meie koodis kasutada.

Sammud:

  • Kõigepealt minge Arendaja vahekaart ja valige Visual Basic .

  • Järgnevalt on Visual Basic aknas, klõpsake Sisesta ja valige Moodul .

  • Nüüd sisestage paremal asuvasse uude mooduli aknasse järgmine valem:
 Sub SaveCopyAs_Method() Application.DisplayAlerts = False ActiveWorkbook.SaveCopyAs "C:\Users\USER\Desktop\5700\SaveCopyAs method.xlsx" End Sub 

  • Seejärel sulgege VBA aknas ja navigeerige Arendaja tab uuesti.
  • Valige siinkohal Makros .

  • Nüüd on Makro aknas peaksite nägema makrokoodi, mille me sisestasime.
  • Seejärel klõpsake nuppu Käivita .

  • Lõpuks avage kaust, kuhu salvestasite faili, ja see peaks olema saadaval jaotises XLSX formaat, nagu me tahtsime.

Loe edasi: Kuidas salvestada Exceli makrofailid failinimena lahtri väärtusest

2. Failinime määramine

Me saame salvestada excel-faili koopia aadressil XLSX formaadis, määrates faili nime VBA kood. Faili nime määramisel lisame ka faililaiendi, mis teisendab faili meie soovitud formaati. Selle meetodi jätkamiseks sisestage alljärgnev kood faili aadressile VBA mooduli aken.

 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ärast koodi sisestamist käivitage see lihtsalt programmist Makros valikut, nagu me eelnevalt näitasime. Nüüd mine salvestuskausta ja faili koos XLSX formaat peaks nüüd olemas olema.

Loe edasi: Exceli VBA, et salvestada töövihik konkreetsesse kausta koos kuupäevaga

3. Failiformaadi numbri sisestamine

Failiformaadi numbrid on unikaalsed numbrid, mis tähistavad salvestamise ajal konkreetset failitüüpi. Selle õpetuse puhul on meie eesmärk salvestada excel'i koopia kui XLSX faili kasutades VBA Niisiis, me kasutame formaatnumbrit 51 , mis tähistab XLSX failitüüpi. Seega, kirjutage järgmine kood faili VBA moodul:

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

Kui te nüüd seda koodi käivitate, salvestab excel kohe töövihiku sellesse XLSX formaat. Seda saate kinnitada, kontrollides sihtkausta.

Loe edasi: Exceli VBA failivormingu salvestamine (12 sobivat näidet)

4. Salvestamine koos parooliga

Paljudel juhtudel on väga oluline salvestada exceli töövihiku koopia aastal XLSX formaadis täiendava parooliga. See kehtib eriti töövihikute puhul, millel on kõrge turvalisusega seotud probleemid. Seda ülesannet saab väga lihtsalt saavutada, kasutades VBA ja seadistada kohandatud salasõna koos dokumendi salvestamisega. Selleks sisestage alljärgnev VBA koodis Moodul aken:

 Sub Save_With_Password() Application.DisplayAlerts = False ActiveWorkbook.SaveAs _ Filename:="C:\Users\USER\Desktop\5700\Save with password.xlsx", Password:="one" End Sub 

Lõpuks, nagu me nägime enne, tuleb lihtsalt käivitada see kood alates Makros valikud. Kui nüüd lähete oma salvestatud kausta, peaksite leidma faili, mille nime andsite ja XLSX pikendus lõpus.

Loe edasi: Excel VBA: salvestada leht uue töövihikuna ilma avamata

5. Säästa, soovitades ainult lugemist

Vähem range viis dokumendi kaitsmiseks on muuta see ainult lugemiseks mõeldud failiks. Kui salvestate excel-faili koopia dokumendis XLSX formaadis, siis saate seadistada ainult lugemiseks mõeldud tingimuse kasutades VBA Selleks tuleb sisestada järgmine kood faili VBA moodul:

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

Seejärel käivitage see kood Makros valikuvõimaluse all Arendaja See peaks säästma XLSX praeguse töövihiku koopia, nagu allpool näidatud.

Loe edasi: Exceli VBA faili salvestamiseks muutuja nimega (5 näidet)

Asjad, mida meeles pidada

  • Veenduge, et muudaksite salvestusraja XLSX faili VBA See peaks vastama teie arvutis asuvale kausta teele.
  • Kontrollige kaks korda, et te kirjutate kõik sisseehitatud VBA toimib täpselt nii, nagu mina olen teinud.
  • Pidage meeles, et mõnel juhul on VBA kood ei pruugi olla enam kättesaadav VBA aknas pärast koodi käivitamist.

Kokkuvõte

Ma loodan, et meetodid, mida ma näitasin, et salvestada excel faili koopia aastal XLSX formaat, kasutades VBA olid teile abiks. Kui jääte mõne sammu juures hätta või kood ei tööta, siis soovitan paar korda kontrollida minu poolt esitatud koode. Samuti proovige koodi mingil määral muuta, et aru saada, mida kood teeb. Lõpetuseks, et õppida rohkemat excel tehnikaid, järgige meie ExcelWIKI Kui teil on küsimusi, palun andke mulle kommentaarides teada.

Hugh West on suurte kogemustega Exceli koolitaja ja analüütik, kellel on selles valdkonnas üle 10-aastane kogemus. Tal on raamatupidamise ja rahanduse bakalaureusekraad ning ärijuhtimise magistrikraad. Hugh’l on kirg õpetamise vastu ning ta on välja töötanud ainulaadse õpetamisviisi, mida on lihtne järgida ja mõista. Tema Exceli ekspertteadmised on aidanud tuhandetel õpilastel ja spetsialistidel üle maailma oma oskusi parandada ja karjääris silma paista. Oma ajaveebi kaudu jagab Hugh oma teadmisi maailmaga, pakkudes tasuta Exceli õpetusi ja veebikoolitusi, mis aitavad üksikisikutel ja ettevõtetel oma potentsiaali täielikult ära kasutada.