Salvestage andmed VBA abil Exceli tabelisse.
Exceli arvutustabeli loomine Accessis võib säästa aega, kui peate eksportima andmed Exceli tabelisse. Visual Basic for Applications (VBA) võib olla võimas tööriist protsesside automatiseerimiseks Microsoft Office'i rakendustes. VBA-ga saate kasutada Microsoft Exceli rakenduse objekti, et luua Accessist Exceli tabel. Exceli rakenduse objekt on ülejäänud objektimudeli sisenemispunkt. Eksportige andmed kiiremini Excelisse, salvestades andmed otse Exceli tabelisse.
Samm 1
Käivitage Microsoft Office Access, klõpsake tühja andmebaasi loomiseks nuppu "Tühi andmebaas" ja nuppu "Loo". Klõpsake vahekaarti "Andmebaasi tööriistad" ja klõpsake Microsoft Visual Basicu akna avamiseks "Visual Basic". Uue koodimooduli sisestamiseks klõpsake menüül "Insert" ja klõpsake "Moodul".
Päeva video
2. samm
Klõpsake menüüd "Tööriistad" ja klõpsake nuppu "Viited". Kerige alla ja märkige ruut "Microsoft Excel
3. samm
Uue alamprotseduuri loomiseks alustage järgmise VBA-koodi sisestamisega:
Privaatne alam createSpreadSheet()
4. samm
Jätkake järgmise koodi tippimisega, et luua kolm uut muutujaobjekti, mida kasutatakse Exceli arvutustabeli loomiseks.
Dim uusExcelApp nagu Excel. Rakendus. Dim newWbk Excelina. Töövihik. Dim newWkSheet Excelina. Tööleht
5. samm
Exceli käivitamiseks ja kuvamiseks lisage järgmine kood:
Määra uusExcelApp = Excel. Rakendus
uusExcelApp. Nähtav = tõsi
6. samm
Uue töövihiku ja töölehe lisamiseks tippige järgmine:
Määra newWbk = newExcelApp. Töövihikud. Lisama
Määra newWkSheet = newWbk. Töölehed (1)
7. samm
Lisage oma uude arvutustabelisse andmed, tippides järgmise:
uusWkSheet. Lahtrid (1, 1).Väärtus = "Uus tööleht..."
8. samm
Salvestage loodud uus töövihik, tippides järgmise koodi:
uusWkSheet. SaveAs ("C:\myworksheet.xlsx")9. samm
Redigeerige eelmise sammu teed ja tippige soovitud tee ja failinimi.
10. samm
Alamprotseduuri lõpetamiseks tippige järgmine:
Lõpeta alam
11. samm
Protseduuri käivitamiseks ja uue Exceli tabeli loomiseks vajutage "F5".
