Visos „Microsoft“biuro programos palaiko automatizavimą. Jie gali veikti kaip COM serveriai ir naudoti iš dokumentuose įdėtų ar išorinių scenarijų. Taigi, galite rašyti duomenis į „Excel“dokumentą iš „VBA“scenarijaus.
Būtinas
- - įdiegta „Microsoft Excel“programa;
- - Visual Basic redaktorius / teksto redaktorius.
Nurodymai
1 žingsnis
Sukurkite konteinerį, kuriame talpinsite VBA kodą. Jei scenarijus turi būti įterptas į dokumentą, įkelkite atitinkamą failą į „Microsoft Excel“. Atidarykite „Visual Basic“redaktorių paspausdami „Alt“+ F11. Jei reikia, sukurkite naują modulį (modulio elementas meniu Įterpti). Atidarykite vieną iš modulių ar formų. Sukurkite tvarkyklę formos valdymui arba tiesiog pridėkite procedūrą prie modulio. Pavyzdžiui:
Papildomas testas ()
Pabaigos antr
Jei kuriate atskirą scenarijų (tai yra, jis veiks pagal „Windows Script Host“), tada tiesiog sukurkite failą su plėtiniu „vbs“teksto redaktoriuje.
2 žingsnis
Į dokumente įdėtą scenarijų procedūros pradžioje pridėkite kintamųjų deklaracijas:
„Dim oWorkbook“kaip „Excel“. Darbo knyga
„Dim oSheet“kaip „Excel“. Darbo lapas
Pirmasis skirtas saugoti nuorodą į „Excel“darbaknygės objektą, o antrasis - lapui.
3 žingsnis
Inicializuokite kintamuosius su objekto nuorodomis. VBS scenarijuje sukurkite „Excel“programos objektą (tai paleis „Excel“kaip COM serverį):
Nustatykite oApplication = CreateObject („Excel. Application“).
Į dokumentą įdėtame scenarijuje vietoj kintamojo „oApplication“bus naudojamas visuotinis „Application“objektas, nurodantis dabartinį programos objektą. Pasirinkite esamą arba atidarykite naują „Excel“darbaknygę. Pavyzdžiui:
Nustatyti darbo knygą = Programa. Darbo knygos (1)
Nustatykite „oWorkbook = Application. Workbooks“(„Book1“)
Nustatykite oWorkbook = oApplication. Workbooks. Open ("D: / vic / relevant / tmp / test.xls")
Gaukite nuorodą į norimą knygos lapą:
Nustatykite oSheet = oApplication. Sheet („Sheet1“)
4 žingsnis
Rašykite duomenis į „Excel“iš „VBA“scenarijaus. „OSheet“kintamajame naudokite langelių rinkinį, kuris yra darbaknygės lapo objekto, nurodyto ankstesniame žingsnyje, ypatybė. Stygos rašymo į vieną langelį pavyzdys gali atrodyti taip:
oSheet. Cells (1, 1) = "Eilutė bus įrašyta į langelį A1"
5 žingsnis
VBS scenarijuje pridėkite kodą, kad išsaugotumėte duomenis, ir išjunkite „Excel“programą:
Darbo knyga. Išsaugoti
Taikymas. Baigti
6 žingsnis
Išsaugokite ir vykdykite scenarijų. „Visual Basic“redagavimo priemonėje paspauskite „Ctrl“+ S, tada padėkite žymeklį procedūros tekste ir paspauskite F5. Išsaugokite VBS scenarijų diske ir paleiskite jį kaip įprastą failą.
