Set Hyperlink Default

N

nancye

I have a browse button on my form that opens the Insert Hyperlink window to
browse and select the path of a document or folder.
How do I set this to start at a specific folder on the network ie:
s:\Trial Prep\LiabilityDocs\...?

Here is the code to open the Insert Hyperlink window:
Private Sub cmdBrowsePIDBookSource_Click()
On Error GoTo ErrEditHyper
Me.PIDBookSourceLink.SetFocus

DoCmd.RunCommand acCmdEditHyperlink

Exit Sub
ErrEditHyper:
Select Case Err
Case 2046
'Edit Hyperlink not available
MsgBox "You must be in a hyperlink field.", vbCritical, "Error Message"
Resume Next
Case 2501
'Cancel button selected do nothing
Resume Next
Case Else
MsgBox Err & vbCrLf & vbCrLf & Err.Description, vbCritical, "Error
Message"
Resume Next
End Select
End Sub

Thanks,
Nancy
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top