Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Otvorte aplikáciu Microsoft Word .
2
Kliknite na " Nástroje " , " Makro " a potom " Visual Basic " . Tým sa otvorí editor VBA .
3
Kliknite na " Vložiť " a potom " modul " . Teraz by ste mali mať prázdne modulu kódu
4
Zadajte alebo skopírujte a vložte nasledujúci kód do modulu kódu : .
Private Sub ControlExcel ( )
Dim intCol As Integer
Dim intRow As Integer
Dim Oxl ako objekt
Dim oBook ako objekt
Dim oSheet As Object
Dim ORANGE As Object
intCol = 3
intRow = 1
Set Oxl = CreateObject ( " Excel.Application " )
oXL.DisplayAlerts = False
Nastaviť oBook = oXL.workbooks.Add
Set oSheet = oBook.Sheets ( 1 )
oSheet.cells ( intRow , intCol ) . Value = " Toto je test použitie OLE "
' Zobraziť relácie programu Excel .
oXL.Visible = true
End Sub
kód používa OLE prepojiť a spojiť sa s Microsoft Excel , a potom sa otvorí Excel , pridá zošita a listu a pokračuje písať text, " Toto je test pomocou OLE . "
5
Stlačte " F5 " pre spustenie programu .
Copyright © počítačové znalosti Všetky práva vyhradené