VBA Hyper link - 255 Character Limit issue!

[TTUK]

Hi all,

My code is:

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)


Dim fd As FileDialog
    
    If Target.Count > 1 Then Exit Sub
    If Target.Column = 9 And Target.Row > 5 And Target.Row < 3000 Then
    If Target.Hyperlinks.Count = 0 Then
        Set fd = Application.FileDialog(msoFileDialogFilePicker)
        With fd
            .InitialFileName = ""
            .InitialView = msoFileDialogViewList
            .AllowMultiSelect = False
            .title = "Insert Hyperlink"
            If .Show <> 0 Then ActiveSheet.Hyperlinks.Add Anchor:=Target, Address:=.SelectedItems(1), TextToDisplay:="Link to File"
    End With
    End If
    End If
End Sub

My file path for example could be for example:
\\vsrv010\SHARED\00 B.O.S\Formal Index\# Department Controls\7. Human Resources (HR)\3. Forms (FO)\FO-08_New Starter Personal Details Form.doc

But when I click the hyperlink it only goes so far, and opens up a folder location. It won't open the specific file.

Is there any way I can get around this?!
Look forward to your support!

Regards, TTUK

 

[AlphaFrog]

# Department Controls

If you could remove the # character from the folder name, I think that will solve the problem.


Special Characters In Hyperlinks