Hi,

I have a function to upload a file, but it does not seem to work. Has
someone some suggestions?

Thanks
Jos Vens

Function My_Upload()

Dim oBk As Workbook
Set oBk = ActiveWorkbook
oBk.SaveAs "

End Function

Did you try it manually with the macro recorder on to see what appeared in
the module? Just a suggestion, not necessarily a good one :-(.
"Jos Vens" wrote in message
...
Hi,

I have a function to upload a file, but it does not seem to work. Has
someone some suggestions?

Thanks
Jos Vens

Function My_Upload()

Dim oBk As Workbook
Set oBk = ActiveWorkbook
oBk.SaveAs
"

End Function