Vse pisarniške aplikacije Microsofta podpirajo avtomatizacijo. Lahko se izvajajo kot strežniki COM in se uporabljajo iz vdelanih dokumentov ali zunanjih skriptov. Torej lahko podatke v Excel dokument zapišete iz skripta vba.
Potrebno
- - nameščena aplikacija Microsoft Excel;
- - urejevalnik / urejevalnik besedil Visual Basic.
Navodila
Korak 1
Ustvarite vsebnik za gostovanje kode vba. Če naj bo skript vdelan v dokument, naložite ustrezno datoteko v Microsoft Excel. Odprite urejevalnik Visual Basic s pritiskom na Alt + F11. Po potrebi ustvarite nov modul (postavka modula v meniju Vstavi). Odprite enega od modulov ali obrazcev. Ustvarite vodnik za nadzor obrazca ali modulu dodajte postopek. Na primer:
Sub test ()
Končaj pod
Če razvijate samostojni skript (to pomeni, da se bo zagnal v programu Windows Script Host), preprosto ustvarite datoteko s pripono vbs v urejevalniku besedil.
2. korak
V skript, vdelan v dokument, dodajte izjave spremenljivk na začetku postopka:
Dim oWorkbook As Excel. Workbook
Dim oSheet As Excel. Worksheet
Prva je namenjena shranjevanju sklicevanja na objekt Excelovega delovnega zvezka, druga pa na listu.
3. korak
Inicializirajte spremenljivke s sklici na objekt. V skriptu vbs ustvarite Excelov objekt aplikacije (s tem se bo Excel zagnal kot strežnik COM):
Nastavite oApplication = CreateObject ("Excel. Application").
V skriptu, vdelanem v dokument, bo namesto spremenljivke oApplication, ki se nanaša na trenutni aplikacijski objekt, uporabljen globalni objekt Application. Izberite obstoječi ali odprite nov Excelov delovni zvezek. Na primer:
Nastavite oWorkbook = Application. Workbooks (1)
Nastavite oWorkbook = Application. Workbooks ("Knjiga1")
Nastavite oWorkbook = oApplication. Workbooks. Open ("D: / vic / relevant / tmp / test.xls")
Poiščite povezavo do želenega lista knjige:
Nastavite oSheet = oApplication. Sheets ("Sheet1")
4. korak
Zapišite podatke v Excel iz skripta vba. Zbirko Celice, ki je lastnost predmeta lista delovnega zvezka, na katerega se sklicuje v prejšnjem koraku, uporabite v spremenljivko oSheet. Primer pisanja niza v eno celico je lahko videti tako:
oSheet. Cells (1, 1) = "Niz bo zapisan v celico A1"
5. korak
V skriptu vbs dodajte kodo, da shranite podatke, in zaprite aplikacijo Excel:
o Delovna knjiga. Shrani
oApplication. Quit
6. korak
Shranite in izvedite skript. V urejevalniku Visual Basic pritisnite Ctrl + S in nato postavite kazalko v telo postopka in pritisnite F5. Skript vbs shranite na disk in ga nato zaženite kot običajno datoteko.
