Spire.XLS for .NET is a professional Excel .NET library that can be used to any type of .NET 2.0, 3.5, 4.0 or 4.5 framework application, both ASP.NET web sites and Windows Forms application.

Thu Sep 29, 2011 9:51 am

Hello,
I have a problem with a file, it mentions an error on opening.
Code: Select all
 The argument specified was not within the range of valid values. Err.Number = 5


Here is the code, can you help me, thank you in advance.

Code: Select all
     Dim workbook As Workbook = New Workbook()
        Dim openFileDialog1 As New OpenFileDialog()
        openFileDialog1.Filter = "Excel 2007|*.xlsx"
        openFileDialog1.Title = "Ouvrir une importation"

        If openFileDialog1.ShowDialog() = DialogResult.OK Then
            ' Assign the cursor in the Stream to the Form's Cursor property.
            M_sfile = openFileDialog1.FileName
        End If

        Try
            workbook.LoadFromFile(M_sfile, ExcelVersion.Version2010)
        Catch ex As Exception
            Console.WriteLine(Err.Description)
            Console.WriteLine(Err.Number)
        End Try
        Dim sheet As Worksheet = workbook.Worksheets(0)


Guy Muller

gmuller@vonet.ch
 
Posts: 8
Joined: Wed Mar 23, 2011 10:58 am

Fri Sep 30, 2011 3:52 am

Hello,Guy Muller

Sorry for any inconveniences caused by us and thank you for your patience with our reply.
I have tested the Err.number which is always within the range of valid values. Err.Number = 5. You can have a try the following code:
Code: Select all
         Dim filename As String
         Dim workbook As New Workbook()
         Dim openDlg As New OpenFileDialog()
            openDlg.Filter = "Excel 2007|*.xlsx|All Files|*.*"
         openDlg.Title = "Ouvrir une inportation"

         If openDlg.ShowDialog() = DialogResult.OK Then
            filename = openDlg.FileName
            Try
                    workbook.LoadFromFile(filename, ExcelVersion.Version2007)
                   
            Catch ex As Exception
                    Console.WriteLine(Err.Description)
                    Console.WriteLine(Err.Number)
                End Try
                Dim worksheet As Worksheet = workbook.Worksheets(0)
                worksheet.Range("A1").Text = "Hello,World"
                workbook.SaveToFile("..\..\Test.xlsx")
                System.Diagnostics.Process.Start("..\..\Test.xlsx")       
            End If   

If you still have any question, please contact us.
Tina
Technical Support/Developer,
e-iceblue Support Team
User avatar

Tina.Lin
 
Posts: 152
Joined: Tue Sep 13, 2011 5:37 am

Return to Spire.XLS