Køre eksekverbare filer

Place th efolllowing in a module:

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

Then this is how you use it.

        result = ShellExecute(0, \"Open\", \"PathAndName\", \"\", \"Path\", SW_SHOW)

svar

Dette kan jeg ikke få til at virke.

Den laver en kompiler fejl.

Dette er hvad jeg har sat ind

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

Sub Knap1_Klik()

RetVal = ShellExecute(0, \"Open\", \"c:\\minfil.csvauto\", \"\", \"c:\\\", SW_SHOW)


End Sub

What is the error?

Sub Knap1_Klik()

Dim retval as Variant

RetVal = ShellExecute(0, \"Open\", \"c:\\minfil.csvauto\", \"\", \"c:\\\", SW_SHOW)


End Sub

Is this the file name
minfil.csvauto ?

jep.

filen hedder minfil.csvauto og ligger i c:

Denne fil er associeret til et program som er indstalleret på computeren.

Do you still have an error? Look at the comment from 10:12:53

Der sker bare intet

Det hele handler om at jeg vil lave en knap i excel som køre denne fil. Denne fil eksporter nogle dataer til udklipsholderen, som jeg så kan sætte ind i excel.

hi thomas>
Well up until now I thought that we were talkning Visual Basic, but now I can see its VBA. I have no idea if this works in Excel! It works in Access and Visual Basic.


I cant see why it shouldnt work in Excel though!
Is it possible to debug your code see what is happening?

Sorry I cant help you there thomas!

That ok..

My fail

You get the point anyway