Coding to Open myBrowser and insert a Hyperlink

[AllusiveKitten]

Hi

I was wondering if it was possible to code in a command to open the browser which will select a file that I want to insert as a hyperlink using a form.

I hope this does not sound too confusing.

Thank you
AK

[MMcCarthy]

Firstly you will have to make sure there is a reference ticked to the Microsoft Office library and I think this only works properly in Office XP (2002) and above.

Now add the following code to your command button. You don't specify the type of file so I'm going with Excel.

Dim dlgPickFiles As FileDialog
Dim strFilePath As String
 
    Set dlgPickFiles = Application.FileDialog(msoFileDialogFilePicker)
 
    With dlgPickFiles
        .AllowMultiSelect = False
        .Filters.Clear
        .Filters.Add "Excel files", "*.xls"
    End With
 
    If dlgPickFiles.Show Then
        strFilePath = dlgPickFiles.SelectedItems.Item(1)
    End If
 
    Set dlgPickFiles = Nothing
    Me.txtHyperlink = strFilePath ' I don't know the name of the textbox
 
End Sub
 

[AllusiveKitten]

Thank you so much mmccarty,

You have saved me from going nuts, I cannot thank you enough.

Cheers

AK

[MMcCarthy]

Thank you so much mmccarty,

You have saved me from going nuts, I cannot thank you enough.

Cheers

AK

You're welcome.