Запуск отчета Navision из Excel

[Fallen]

Через нее родную и пытаюсь:



Sub RunNav()

On Error Resume Next

Program = "C:\Program Files\Navision Attain\Client\fin.exe servername=ServerName, database=DatabaseName, company=CompanyName, target= Report ReportNo, view=SORTING(Field3) WHERE(Field3=1(ActiveCell.Value)), requestform=Да,servertype=MSSQL"

TaskID = Shell(Program, 1)
If Err <> 0 Then
MsgBox "Нельзя запустить" & Program, vbCritical, "Ошибка"
End If
End Sub

вот так оно выглядит(я в VBA дуб-дерево =))