Maybe its just the path:

Sub samples()
fn = "C:\hithere.vbs"
Set wshShell = CreateObject("Wscript.Shell")
wshShell.Run (fn)
End Sub


works just fine.

--
Gary''s Student - gsnu200730


"rhXX" wrote:

hi,

i am trying to run a vb script from a VBA module in excel.

fn = "test.vbs
Set wshShell = CreateObject("Wscript.Shell")
wshShell.Run (fn)

in the line wshShell.Run (fn) i obtain an error error 80070483

method Run of object IWshShell3 failed

it is the first time i do this, so i am not shure if i need to have
done something before, some references???

in windows extension .vbs is not related to any application (is it
ok???)

tks in advance