HejRun-time error när jag skall öppna fil i kod
Skall från en xls fil öppna en annan xls fil.
Koden ser ut som följer.
Provat med flera varianter som synes.
Sub openImportFile()
' Dim xlApp As Excel.Application
' Dim xlwbBook As Excel.Workbook
' Dim strPa As String
On Error GoTo errorH
Application.ScreenUpdating = False
' strPa = Range("input_File").Value
' 'Instantierar nytt Excel-object.
' Set xlApp = New Excel.Application
' Set xlwbBook = xlApp.Workbooks.Open(strPa) 'Spricker här
' Open input file
Workbooks.Open Filename:=Range("input_File").Value 'Spricker här
ThisWorkbook.Activate
Exit Sub
Filen som jag pekar ut öppnar sig men jag får ändå detta meddelande.
Run-time error '-2147024809 (80070057)
The item with the specified name wasn´t found.
Någon som har någon lösning?
Senaste service pack för W2000 är installerat på min maskin.
//PA