Open folder using VBA

[dcoledc]

Can someone tell me why this code works in 2010 but not in 2003?

    ChDir ThisWorkbook.Path
    ChDir ".\..\..\" & "Patient Pictures\" & Sheets(FirstVisibleSheet).Range("d10") & ", " & Sheets(FirstVisibleSheet).Range("j10")
    x = CurDir
    ActiveWorkbook.FollowHyperlink Address:=x, NewWindow:=True

It is supposed to open the folder in a new window and works perfectly in 2010. In 2003 it appears to do nothing.

 

[dcoledc]

Nevermind, I found an error in my 2003 code.