What did you try? Try this modification, although I haven't tested it because the destination is a network drive:
![]()
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 2 And Target.Value = "Yes" Then Target.Hyperlinks.Add Target, "\\TUGALW-FP02\DEPT\VE\Returned\" & Format(Target.Offset(0, -1), "0000") & ".pdf" Target.Value = Format(Target.Offset(0, -1), "0000") & ".pdf" End If End Sub
Bookmarks