A Microsoft összes irodai alkalmazása támogatja az automatizálást. Futtathatók COM-kiszolgálóként, és dokumentumba ágyazott vagy külső szkriptekből használhatók. Tehát írhat adatokat egy Excel dokumentumba egy vba parancsfájlból.
Szükséges
- - telepített Microsoft Excel alkalmazás;
- - Visual Basic szerkesztő / szövegszerkesztő.
Utasítás
1. lépés
Hozzon létre egy tárolót az vba kód tárolására. Ha a parancsfájlt be akarja ágyazni egy dokumentumba, töltse fel a megfelelő fájlt a Microsoft Excel programba. Nyissa meg a Visual Basic Editor alkalmazást az Alt + F11 billentyűkombinációval. Ha szükséges, hozzon létre egy új modult (Modul elem a Beszúrás menüben). Nyissa meg az egyik modult vagy űrlapot. Hozzon létre egy kezelőt az űrlapvezérléshez, vagy egyszerűen adjon hozzá egy eljárást egy modulhoz. Például:
Részvizsgálat ()
End Sub
Ha önálló szkriptet fejleszt (vagyis a Windows Script Host alatt fut), akkor egyszerűen hozzon létre egy fájlt a vbs kiterjesztéssel egy szövegszerkesztőben.
2. lépés
A dokumentumba ágyazott szkriptben adja hozzá a változó deklarációit az eljárás elején:
Dim oWorkbook As Excel. Workbook
Dim oSheet mint Excel. Worksheet
Az első egy Excel munkafüzet objektumra való hivatkozás tárolására szolgál, a második pedig egy munkalapra.
3. lépés
Inicializálja a változókat objektumhivatkozásokkal. A vbs szkriptben hozzon létre egy Excel alkalmazásobjektumot (ez elindítja az Excel programot COM szerverként):
Állítsa be az oApplication = CreateObject ("Excel. Application") beállítást.
A dokumentumba ágyazott szkriptben a globális Application objektumot fogják használni az oApplication változó helyett, amely az aktuális alkalmazás objektumra utal. Válasszon ki egy meglévő vagy nyisson meg egy új Excel munkafüzetet. Például:
Set oWorkbook = Application. Workbooks (1)
Set oWorkbook = Application. Workbooks ("Book1")
Állítsa be az oWorkbook = oApplication. Workbooks. Open ("D: / vic / relevant / tmp / test.xls" parancsot)
Kap egy linket a könyv kívánt lapjára:
Állítsa be az oSheet = oApplication. Sheet ("Sheet1")
4. lépés
Írjon adatokat az Excelbe a vba szkriptből. Használja az OSheet változóba a Cellák gyűjteményt, amely az előző lépésben hivatkozott munkafüzetlap-objektum egyik tulajdonsága. Példa egy karakterlánc írására egy cellába így nézhet ki:
oSheet. Cells (1, 1) = "A karakterlánc be lesz írva az A1 cellába"
5. lépés
A vbs szkriptben adja hozzá a kódot az adatok mentéséhez, és állítsa le az Excel alkalmazást:
Munkafüzet. Mentés
oApplication. Quit
6. lépés
Mentse és hajtsa végre a parancsfájlt. A Visual Basic Editorban nyomja meg a Ctrl + S billentyűkombinációt, majd helyezze a kurzort az eljárás törzsébe, majd nyomja meg az F5 billentyűt. Mentse a vbs szkriptet lemezre, majd futtassa normál fájlként.
