Tervehdys,
minulla on netistä löydetty ja hieman muokattu VBA-koodi jolla saan avattua Excelistä käsin Pdf-tiedoston, mutta pystyykö tuota koodia muokkaamaan jotenkin niin, että koodi itse tutkii mistä polusta AcrobatReader löytyy ettei tule virhettä jos Reader onkin asennettuna eri polkuun?
Sub Open_PDF()
Dim dbRetValue As Double
Dim stAdobeExe As String, stFileName As String
stAdobeExe = "C:\Program Files\Adobe\Acrobat 7.0\Reader\AcroRd32.exe"
stFileName = "C:\Kuluttajaviesti_211207.pdf"
dbRetValue = Shell(stAdobeExe & " " & stFileName, vbMaximizedFocus)
End Sub
-Pasi-
Pdf -avaaminen VBA:lla
-Pasi-
2
577
Vastaukset
Sub AvaaPDF()
Dim Nimi As String
Nimi = "C:\Alpha\AppliedMolding.pdf"
ActiveWorkbook.FollowHyperlink Nimi
End Sub- -Pasi-
niinpä näkyy toimivan, Kiitos.
-Pasi-
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Mikä on kaivattusi etunimi?
Otsikossa siis on kysymys eriteltynä. Vain oikeat vastaukset hyväksytään.1172174En kestä katsoa
Sitä miten sinusta on muut kiinnostuneita. Olen kateellinen. Siksi pitäisi lähteä pois961308Peräti 95 % persujen kannattajista rasisteja
Kertoo EVA:n teettämä kysely. Pakollista yhdenvertaisuuskoulutusta tarvitsee siis paljon laajempi joukko kuin pelkästää3121013Kun viimeksi kohtasitte/näitte
Mitä olitte tekemässä? Millainen ympäristö oli? Löydetään toisemme...81936- 83906
Olet kyllä vaarallisen himokas
Luova, kaunis, määrätietoinen, pervo, mielenkiintoinen, kovanaama, naisellinen ja erikoinen.85886On minulla suunitelma
Siitä ei vain tiedä kukaan muu kuin tällä hetkellä minä. Suunnitelma ja varasuunnitelma. Sinun takiasi nainen. Vain s44680Palstan ylivoimaisesti suosituin keskustelunaihe
Palstan suosituin keskustelunaihe näyttää olevan homoseksuaalisuus. Otsikoiden perusteella voisi kuvitella olevansa Seks248667Ei koskaan saatu tuntea
Mitä olisi ollut painautua toisiimme vasten. Hengittää syvään, hyväillä ja rakastella vailla kiirettä. Tai repiä vaattee33660- 50654