Hvordan bruges Shell()

Dim RetVal
RetVal = Shell("C:\WINDOWS\CALC.EXE", 1)    ' Run Calculator.

I VERY MUCH doubt you can use shell to open an .xls file (Excel) with starting EXCEL with paramaters

Try this instead. Place this declaration in a module and the Sub in a form.

Public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As
Long) As Long


Public Const SW_HIDE = 0
Public Const SW_SHOW = 5

Private Sub Command1_Click()
Dim stAppPath As String
Dim stAppName As String
Dim result As Integer

    stAppPath = "C:\"
    stAppName = "Mappe1.xls"
    stAppPath = "A:\"
   
    result = ShellExecute(0, "Open", stAppName, "", stAppPath, SW_SHOW)

    If result < 32 Then
        MsgBox "Couldn't open file ..."
    End If
   
End Sub

Jeg får MsgBox "Couldn't open file ..." op!

Jeg syntes bare at jeg kan huske at der er noget med at man kan angive det skal være excel.exe der skal åbne den angivne fil også inde i en Shell()

Jeg havde set VB Help under Shell og Calc.exe virker også hos mig (bortset fra at filen ligger i system32 (Win XP))

Little error there!
DELETE this line

stAppPath = "A:\"

stAppPath  is the PATH of where the file is located and
stAppName is the file name

DU ER EN SKAT

Ja, ja fald nu ikke ned af stolen. Men det var det jeg efterlyste - så nu skal jeg ned og have lidt mams!!! Tak.