Ver Mensaje Individual
  #1 (permalink)  
Antiguo 19/02/2016, 13:45
Betina232022
 
Fecha de Ingreso: enero-2008
Mensajes: 366
Antigüedad: 17 años, 2 meses
Puntos: 3
npoi unir varios xls en uno solo

Hola buenas tardes.

Estoy tratando de juntar varios archivos xls en uno solo con la librería npoi, pero me esta marcando un error "Referencia a objeto no establecida como instancia de un objeto", mi código es el siguiente:

Dim CnH As Integer
Dim ArchivoFinal As New HSSFWorkbook
Dim ArchivoH As HSSFWorkbook
Dim sheetCH As HSSFSheet
Dim file2 As FileStream
Try
For CnH = 1 To totalH
ArchivoH = New HSSFWorkbook(New FileStream(RutaPrincipal & "Temp\\" & filename & "_" & CnH & ".xls", FileMode.Open))
sheetCH = ArchivoH.GetSheetAt(0)
sheetCH.CopyTo(ArchivoFinal, sheetCH.SheetName, True, True)
Next CnH
file2 = New FileStream(RutaPrincipal & "Temp\\" & filename & ".xls", FileMode.Create, FileAccess.ReadWrite)
ArchivoFinal.Write(file2)
file2.Close()
Catch ex As Exception
GrabaError(ex.ToString())
End Try


El error me lo marca en la línea: ArchivoFinal.Write(file2)


Espero me puedan ayudar a solucionarlo.

Gracias