Të gjitha aplikacionet e zyrës nga Microsoft mbështesin automatizimin. Ato mund të ekzekutohen si servera COM dhe të përdoren nga skripte të ngulitura në dokument ose të jashtëm. Pra, mund të shkruani të dhëna në një dokument Excel nga një skenar vba.
E nevojshme
- - instaluar aplikacionin Microsoft Excel;
- - Redaktuesi / redaktuesi i tekstit Visual Basic.
Udhëzimet
Hapi 1
Krijoni një enë për të pritur kodin vba. Nëse skenari do të ngulitet në një dokument, ngarkoni skedarin e duhur në Microsoft Excel. Hapni Redaktuesin Visual Basic duke shtypur Alt + F11. Nëse është e nevojshme, krijoni një modul të ri (Artikulli i modulit në menunë Fut). Hapni njërin nga modulet ose format. Krijoni një mbajtës për kontrollin e formës tuaj, ose thjesht shtoni një procedurë në një modul. Për shembull:
Nën test ()
Fundi Nën
Nëse jeni duke zhvilluar një skenar të pavarur (domethënë, ai do të ekzekutohet nën Windows Script Host), atëherë thjesht krijoni një skedar me shtesën vbs në një redaktues teksti.
Hapi 2
Në skriptin e ngulitur në dokument, shtoni deklarata të ndryshueshme në fillim të procedurës:
Lib i punës i zbehtë si Excel. Libër pune
Fletë e zbehtë si Excel. Fletë pune
E para është për të ruajtur një referencë në një objekt të librit të punës në Excel, dhe e dyta është për një fletë.
Hapi 3
Inicimi i variablave me referenca objektesh. Në skenarin vbs, krijoni një objekt të aplikimit Excel (kjo do të nisë Excel si një server COM):
Vendos oApplication = KrijoObject ("Excel. Application").
Në skenarin e ngulitur në dokument, do të përdoret objekti global i Aplikimit në vend të ndryshores oApplication, e cila i referohet objektit aktual të aplikimit. Zgjidhni një libër ekzistues ose hapni një libër të ri të punës në Excel. Për shembull:
Vendosni librin e punës = Zbatim. Librat e punës (1)
Vendosni librin e punës = Application. Worksbooks ("Libri1")
Vendosni librin e punës = oApplication. Workbooks. Open ("D: / vic / relevant / tmp / test.xls")
Merrni një lidhje në fletën e dëshiruar të librit:
Vendos oSheet = oApplication. Sheets ("Fleta1")
Hapi 4
Shkruani të dhëna në Excel nga skenari vba. Përdorni koleksionin Cells, i cili është një pronë e objektit të fletës së punës të referuar në hapin e mëparshëm, në ndryshoren oSheet. Një shembull i shkrimit të një vargu në një qelizë mund të duket kështu:
oSheet. Cells (1, 1) = "Vargu do të shkruhet në qelizën A1"
Hapi 5
Në skenarin vbs, shtoni kodin për të ruajtur të dhënat dhe mbyllni aplikacionin Excel:
oLibri i punës. Kurseni
oAplikimi. Padi
Hapi 6
Ruani dhe ekzekutoni skenarin. Në Visual Basic Editor, shtypni Ctrl + S dhe më pas poziciononi kursorin në pjesën e procedurës dhe shtypni F5. Ruani skriptin vbs në disk dhe më pas ekzekutojeni si skedar të rregullt.
