iT邦幫忙

0

VBA PDF轉JPG問題

  • 分享至 

  • xImage

https://ithelp.ithome.com.tw/upload/images/20221212/20148231r4DrftTi0S.jpghttps://ithelp.ithome.com.tw/upload/images/20221212/20148231x4I6iUwoOJ.jpg
https://ithelp.ithome.com.tw/upload/images/20221212/20148231fGF4Dy602L.jpg

https://drive.google.com/file/d/1uTdGBK1uED0D5iLBkBvh-QFQHPbABqos/view?usp=share_link

以下VBA主要是將PDF轉JPG檔,遇到問題是在家裡使用office2016轉換皆正常,但到公司使用office2013卻失敗,不確定是否版本問題(公司版本如上圖)或公司電腦有限制什麼,想請教網大們是否有其他解法呢?

Sub test()
    Dim oaapp As New Acrobat.AcroApp
    Dim oaavd As New Acrobat.AcroAVDoc
    Dim oapdd As Acrobat.AcroPDDoc
    Dim i As Long
    Dim jso As Object

    i = oaapp.Show
    i = oaavd.Open("D:\TEST.pdf", "")
    Set oapdd = oaavd.GetPDDoc()
    Set jso = oapdd.GetJSObject    
    jso.SaveAs "D:\test-01.jpeg", "com.adobe.acrobat.jpeg"
    i = oaavd.Close(1)
    i = oaapp.Hide
    i = oaapp.Exit
    Set jso = Nothing
    Set oaavd = Nothing
    Set oaapp = Nothing    
End Sub
看更多先前的討論...收起先前的討論...
blanksoul12 iT邦研究生 5 級 ‧ 2022-12-12 09:02:20 檢舉
沒有 Acrobat 這個 plug-in
b大~所以是版本問題??
淺水員 iT邦大師 6 級 ‧ 2022-12-12 15:20:56 檢舉
imagemagick + VBA 的 Shell 函數不知道可不可以
請問有相關範例程式碼嗎?
淺水員 iT邦大師 6 級 ‧ 2022-12-12 19:36:48 檢舉
我後來發現 imagemagick 也是用 ghostscript 把 pdf 轉點陣圖的
這樣直接用 ghostscript 就可(只是授權要注意一下)
(手邊沒 ms office 所以只給幾個關鍵字跟想法,無法幫測)
圖片
  直播研討會
圖片
{{ item.channelVendor }} {{ item.webinarstarted }} |
{{ formatDate(item.duration) }}
直播中

2 個回答

0
海綿寶寶
iT邦大神 1 級 ‧ 2022-12-12 09:20:38
最佳解答

這篇可以試試看
前提是你安裝的是 Acrobat Professional

看更多先前的回應...收起先前的回應...

海大,公司安裝的是....https://ithelp.ithome.com.tw/upload/images/20221212/20148231Ff8MjEQcYT.jpg

結果剛試還是不行~~

那就等真正高手的解答了
/images/emoticon/emoticon25.gif

公司IT幫忙安裝Acrobat Professional,真的就解決了~~~ 哈

問題解決就好,恭喜了

0
唉踢
iT邦新手 5 級 ‧ 2022-12-12 10:34:18

Reader有轉存JPEG的功能嗎??我記得要不能只有Reader的版本, 開介面操作看看吧

看更多先前的回應...收起先前的回應...

那應該是這個原因有可能,因為家裡的是Acrobat Professional,但公司安裝的Reader我也不能改,所以....看似此題無解了是吧

blanksoul12 iT邦研究生 5 級 ‧ 2022-12-12 15:11:55 檢舉

如公司沒有便沒法了.
能用 PRINT SCREEN 嗎?

請問有相關範例程式碼嗎?

blanksoul12 iT邦研究生 5 級 ‧ 2022-12-13 10:36:30 檢舉

windows API 操作,不過會把你搞死的.
你想把 pdf 轉圖是想作什麼,可能想法的方向錯誤了

B大,主要是需要每日上傳圖片至公司群組使用,但問題已解決了,公司IT幫忙安裝Acrobat Professional,結果就可以執行了~~~ 哈

我要發表回答

立即登入回答