2011-07-07 40 views
1

方案:我需要能夠複製的訪問功能,其中「點擊右鍵,然後去超鏈接,然後在編輯超鏈接,找到相應的照片,然後點擊確定,將鏈接添加到圖像」。我們的用戶現在只能訪問運行時,並且無法再完成此操作。打開插入超鏈接對話框中訪問

問題:我已經在互聯網上搜索,它告訴我使用Application.Dialogs來打開對話框。唯一的問題是我沒有這個選擇。任何人都可以告訴我需要添加哪個參考才能完成此操作?或者還有另一種方式來打開對話框?

回答

2

對於試圖完成這個任務的未來用戶,我最終不得不發送按鍵來打開對話框。您需要記住在發送密鑰之前將焦點置回到您的文本框中,否則它將不起作用。

Private Sub Command24_Click() 
Text35.SetFocus 
SendKeys ("^k") 
End Sub 
+0

糟糕的解決方案! SendKeys總是一個錯誤。 –

+0

@ David-W-Fenton,那麼請給我一個更好的。 Theres應該是Application.Dialogs,但我沒有那個集合,並且我無法在任何地方找到正確的參考。這是我能找到的唯一解決方案。 – Gage

+0

解決方案是不使用超鏈接字段,因此您不必編輯它們。您也可以查看超鏈接字段的存儲格式,然後您就可以在VBA代碼中進行編輯。 –

2
DoCmd.RunCommand acCmdEditHyperlink 

將打開超鏈接插入/編輯對話框。

「清潔」解決方案(如果您可以進行相應的更改):將路徑作爲文本存儲在數據庫中,並通過Application.FollowHyperlink在任何您喜歡的事件中打開。

1

我讀了整個頁面,發現了一個美妙而快速的解決方案!我所做的只是將建議應用於我的文本框。

這裏是我構建了一個基於上面的子程序:

Private Sub cmdHyperlink_Click() 
    Me.txtPDFLink.SetFocus 
    DoCmd.RunCommand acCmdEditHyperlink 
    End Sub 

它完美而實際上是更容易和比快單擊鼠標右鍵,我關閉,以防止用戶關閉窗體或將其置於設計模式,這是他們不應該做的。