Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky

Domáce Hardware Siete Programovanie Softvér Otázka Systémy

Ako písať do Excelu z VB6

Visual Basic 6 je programovací jazyk a integrované vývojové prostredie nasadenie spoločnosti Microsoft . Jazyk je populárny pre jeho rýchly vývoj aplikácií a možnosťou automatizácie . VB6 programátori sú schopní naprogramovať a automatizovať rad programov spoločnosti Microsoft , vrátane Microsoft Office a najmä Microsoft Excel . Programátori sú schopní odkazovať predmety týkajúce sa programu Excel v ich VB6 kódu, ktorý im umožňuje automatizovať , čítať a písať do programu . Písanie VB6 kódu má nejaké znalosti o svojej programovej syntaxe , akonáhle vedomosti získané , písať do Excelu v VB6 kódu trvá len pár krokov a riadkov kódu nasledovať . Pokyny dovolená 1

Otvorte Visual Basic 6 a zvoľte " Štandardné EXE " z nového zoznamu projektov .
2

Prejsť na hornej lište , kliknite na " projekt " a potom kliknite na " Pridať modul . " To bude pridať štandardné modulu kódu do VB6 projektu .
3

Zadajte alebo skopírujte a vložte nasledujúci kód v module , podľa Mike Rosenblum z Xtreme VB Talk .

Sub WriteToExcel ( )

Dim oExcel Ako Excel.Application ' < - *** Odkaz na objekt programu Excel ***

Dim OWB Ako Excel.Workbook ' < - - *** Odkaz na zošit Excel objekt ***

Dim OWS Ako Excel.Worksheet ' < - *** Odkaz na hárku programu Excel objekte ***

Set oExcel = New Excel.Application

oExcel.Visible = TRUE

Dim oRng1 Ako Excel.Range

Dim oRng2 Ako Excel.Range

Set OWB = oExcel.Workbooks . Pridať

Set OWS = oWB.Worksheets ( " Hárok1 " )

Set oRng1 = oWS.Range ( " A1 " )

Set oRng2 = oWS.Range ( " B2 : E5 " )

oRng1.Value = " Hello World "

Volajte oRng1.Copy ( Destination : = oRng2 ) Spojené

oWB.SaveAs ( " Hello World.xls " ) ' < - výsledky tu uložené

Cleanup :

Set OWS = Nothing

Ak nie je OWB Je Nic Potom oWB.Close

. nastaviť OWB = Nothing

oExcel.Quit

Set oExcel = Nothing

End Sub

kód odkazuje na objekty programu Microsoft Excel , a potom používa toto pripojenie k otvoreniu Microsoft Excel , a potom napísať slovo " Hello World " v bunke A1 a rozsah B2 : E5 . Potom sa uloží dokument ako " Hello World.xls " na vašom počítači a výnosov uzavrieť Microsoft Excel .
4

Stlačte " F5 " pre spustenie programu .


Najnovšie články

Copyright © počítačové znalosti Všetky práva vyhradené