Alle kantoorapplicaties van Microsoft ondersteunen automatisering. Ze kunnen worden uitgevoerd als COM-servers en worden gebruikt vanuit in documenten ingebedde of externe scripts. U kunt dus gegevens naar een Excel-document schrijven vanuit een vba-script.
Noodzakelijk
- - geïnstalleerde Microsoft Excel-applicatie;
- - Visual Basic-editor / teksteditor.
instructies:
Stap 1
Maak een container om de vba-code te hosten. Als het script in een document moet worden ingesloten, uploadt u het juiste bestand naar Microsoft Excel. Open de Visual Basic Editor door op Alt + F11 te drukken. Maak indien nodig een nieuwe module aan (Module-item in het menu Invoegen). Open een van de modules of formulieren. Maak een handler voor uw formulierbesturing, of voeg gewoon een procedure toe aan een module. Bijvoorbeeld:
Subtest ()
Einde sub
Als u een op zichzelf staand script ontwikkelt (dat wil zeggen dat het onder Windows Script Host wordt uitgevoerd), maakt u eenvoudig een bestand met de extensie vbs in een teksteditor.
Stap 2
In het script dat in het document is ingesloten, voegt u aan het begin van de procedure variabele declaraties toe:
Dim oWorkbook As Excel. Workbook
Dim oSheet als Excel. Werkblad
De eerste is voor het opslaan van een verwijzing naar een Excel-werkmapobject en de tweede is voor een blad.
Stap 3
Initialiseer variabelen met objectverwijzingen. Maak in het vbs-script een Excel-toepassingsobject (hiermee wordt Excel als COM-server gestart):
Stel oApplication = CreateObject ("Excel. Application") in.
In het script dat in het document is ingesloten, wordt het globale Application-object gebruikt in plaats van de variabele oApplication, die verwijst naar het huidige toepassingsobject. Selecteer een bestaande of open een nieuwe Excel-werkmap. Bijvoorbeeld:
Stel oWorkbook = Application. Workbooks in (1)
Stel oWorkbook = Application. Workbooks ("Boek1") in
Stel oWorkbook = oApplication. Workbooks. Open in ("D: / vic / relevant / tmp / test.xls")
Krijg een link naar het gewenste blad van het boek:
Stel oSheet = oApplication. Sheets ("Blad1") in
Stap 4
Schrijf gegevens naar Excel vanuit vba-script. Gebruik de verzameling Cellen, een eigenschap van het werkbladobject van de werkmap waarnaar in de vorige stap werd verwezen, in de variabele oSheet. Een voorbeeld van het schrijven van een tekenreeks naar één cel kan er als volgt uitzien:
oSheet. Cells (1, 1) = "De tekenreeks wordt naar cel A1 geschreven"
Stap 5
Voeg in het vbs-script de code toe om de gegevens op te slaan en sluit de Excel-toepassing af:
oWerkboek. Opslaan
oApplicatie. Stop
Stap 6
Sla het script op en voer het uit. Druk in de Visual Basic Editor op Ctrl + S, plaats de cursor in de hoofdtekst van de procedure en druk op F5. Sla het vbs-script op schijf op en voer het vervolgens uit als een normaal bestand.
