![...](/f/85aa7362ed3c842a2bd4f7f5b5a6a99c.jpg)
Ohjelmointi
Visual Basic for Applications (VBA) on ohjelmointikieli, jota käytetään Microsoft Officen kanssa saamaan sovellukset suorittamaan dynaamisia tehtäviä, joista yksi on PDF-tiedostojen avaaminen ja tulostaminen. Suorittaaksesi tämän tehtävän, tarvitset VBA-kielen perustiedot ja VBA-editorin, joka on asennettu jokaisen Microsoft Office -ohjelmistoversion mukana. Tätä koodia voidaan käyttää missä tahansa Microsoft Office -sovelluksessa.
Vaihe 1
Avaa VBA-editori Microsoft Office -sovelluksessa, johon haluat syöttää koodin. Napsauta "Tiedosto" > "Työkalut" > "Makrot" > "Visual Basic Editor" Microsoft Office 2003:n tai vanhemman sovelluksessa. Napsauta "Kehittäjä-välilehti" > "Visual Basic" Microsoft Officen 2007-versiossa.
Päivän video
Vaihe 2
Napsauta mitä tahansa koodiikkunan kohtaa, johon haluat lisätä koodin.
Vaihe 3
Lisää koodi avataksesi PDF-tiedoston. Koodin pitäisi näyttää suunnilleen tältä:
Sub OpenPDF() Dim strPDFFileName As String 'Muokkaa lisätäksesi koko tiedostonimen PDF-tiedostoon, jonka haluat avata strPDFFileName = "C:\esimerkkitiedosto.pdf" 'Tämä seuraava toiminto tarkistaa, eikö tiedosto ole jo auki. Jos tiedosto ei ole lukittu (strPDFFileName) Sitten 'Jos se palauttaa arvon False, jatka sitten PDF-tiedoston avaamista Documents. Avaa strPDFFileName) End If End Sub
Kopioi ja liitä tämä koodi koodiikkunaan. Ainoa koodin osa, joka sinun on muutettava, on koko polku PDF-tiedostoon, jonka haluat avata. Joten korvaa "C:\examplefile.pdf" omalla tiedostopolullasi ja nimelläsi.
Vaihe 4
Lisää koodi PDF-tiedoston tulostamiseksi. Tulostuskoodi on:
Sub PrintPDF (strPDFFileName merkkijonona) Himmeä sAdobeReader merkkijonona 'Tämä on täydellinen polku tietokoneesi Adobe Reader- tai Acrobat-sovellukseen sAdobeReader = "C:\Ohjelmatiedostot\Adobe\Acrobat 6.0\Reader\AcroRd32.exe" RetVal = Shell (sAdobeReader & "/P" & Chr (34) & sStrPDFFileName & Chr (34), 0) Lopeta ala
Ainoa osa tästä koodista, joka on muutettava, on koko polku Adobe Readeriin, Acrobatiin tai mihin tahansa tietokoneesi PDF-lukijaan.
Vaihe 5
Käytä liipaisinta funktioiden kutsumiseen. Näin koodi tietää, milloin se suoritetaan. Käytä mitä tahansa laukaisinta, jonka haluat; lomake, painike, valintaruutu tai muu lomakekohde. Käytä esimerkiksi painikkeen "Click"-määritystä. Kun painiketta napsautetaan, PDF-dokumentti avautuu ja tulostuu. Koodi näyttää tältä:
Sub CommandButton_Click() 'Kutsu ensin open-toiminto, jotta PDF voi avautua ennen tulostamista Soita OpenPDF' Kutsu nyt tulostustoiminto, jotta PDF voidaan tulostaa Soita PrintPDF End Sub
Kopioi vain yllä olevan koodin keskiosa (ala- ja loppuosa-osien välissä) lomakekohteeseen ja käynnistä, jota päätät käyttää.
Asiat, joita tarvitset
Microsoft Office -sovellus
PDF-lukijasovellus
Kärki
Jos käytät vuoden 2007 versiota etkä näe "Kehittäjä"-välilehteä, napsauta "Office"-painiketta ja sitten "Asetukset"-painiketta valikon alaosassa. Napsauta "Näytä Kehittäjä-välilehti nauhassa" ja napsauta "OK".