Full program as-is below. Excel 2010.
Shell refuses to work (PC not MAC), always get error "File not found"
no matter how i mangle that line.

Naturally, there is NO "help" as this is M$ we are talking about.

Sub TestDIR()

' Macro recorded 04/12/2018 by ROBERT BAER
'
destPath = "G:\ANALOG"
DaTm = Date$ + " " + Time$
Open pPath + "Log.TXT" For Append As #1
' error "File not found" any variant of Shell.
pState = Shell("DIR *.* LOOK.DIR", vbNormalFocus)
'QB3 FORMAT is SHELL "DIR *.BMP LOOK.DIR"
Stop
Print #1, DaTm + " to " + vNam
Close


End Sub

Help?
Thanks.