Macro to open specific folder

Maybe:

Sub siobeh()
Dim Yourfolder As String

Yourfolder = "U:\A Sample1\B Sample2\"
ActiveWorkbook.FollowHyperlink Yourfolder, NewWindow:=True

End Sub