我想根據另一個作業表 "Paths "單元格C2中的檔案路徑打開一個特定的PDF，當我點擊一個按鈕（在另一個作業表中）并分配一個宏。
我上個月剛剛開始學習vba，到目前為止，我已經掌握了這個方法，但是我遇到了一個錯誤--
Sub Sample()
ActiveWorkbook.FollowHyperlink Sheets("Paths"/span>).Range("C2"/span>)
結束 子
錯誤是：
運行時錯誤'-214722104 (800401ea)'。 無法打開指定的檔案。
請幫助。
請幫助。
uj5u.com熱心網友回復：
我認為腳本上沒有錯誤。 請檢查以下幾點。
我認為腳本沒有錯誤。
請檢查它。
uj5u.com熱心網友回復：
我剛剛做了這個迂回的方法來打開pdf ...
''' Sub OpenCIS()
Sheets("Paths"/span>).Select
Range("C3").Select
選擇.復制
Dim x As Variant
Dim Path As String
' 設定Path變數等于你程式的安裝路徑。
Path = Sheets("Paths"/span>).Range("C2"/span>)
x = Shell(Path, vbNormalFocus)
Application.Wait Now 0.00002[/span].
應用程式.SendKeys "^{o}", True。
Application.Wait Now 0.00002.
應用程式.SendKeys "^{v}", True
應用程式.SendKeys "{HOME}", True.
Application.SendKeys "{DEL}", True '洗掉路徑前的?
Application.SendKeys "{ENTER}", True
結束子 ''' 我不知道為什么路徑顯示為？C:UsersRenee ArianneDesktopDesktop - Filled CISCIS_2016 v5 filled.pdf.
轉載請註明出處，本文鏈接：https://www.uj5u.com/qiye/317224.html
標籤：
下一篇：下載pdf-螢屏閱讀器的可訪問性