Borrar hoja de excel.
Publicado por jose (33 intervenciones) el 28/08/2013 20:43:48
Buenas noches a todos,
Estoy empezando a trabajar con VB.net 2010 estoy creando un WindowsForm con varios botones con codigo para utilizarlo en algun momento.
Intento crear un codigo para borrar una hoja en un libro excel, sin embargo siempre tengo el mismo codigo error:
Invalid index. (Exception from HRESULT: 0x8002000B (DISP_E_BADINDEX))
Este el codigo, alguien sabe alguna manera en vb.net de borrar una hoja o cual es el error del codigo. En google no encuentro nada mas.
Private Sub BT_DelSheet_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BT_DelSheet.Click
ApExcel = New Excel.Application
Dim libro As Excel.Workbook = ApExcel.Workbooks.Add()
Dim hoja4 As Excel.Worksheet
hoja4 = ApExcel.Worksheets(1)
'hoja4 = CType(ApExcel.ActiveWorkbook.Sheets(4), Excel.Worksheet)
hoja4 = CType(libro.Sheets("Hoja4"), Excel.Worksheet)
hoja4.Delete()
End Sub
Estoy empezando a trabajar con VB.net 2010 estoy creando un WindowsForm con varios botones con codigo para utilizarlo en algun momento.
Intento crear un codigo para borrar una hoja en un libro excel, sin embargo siempre tengo el mismo codigo error:
Invalid index. (Exception from HRESULT: 0x8002000B (DISP_E_BADINDEX))
Este el codigo, alguien sabe alguna manera en vb.net de borrar una hoja o cual es el error del codigo. En google no encuentro nada mas.
Private Sub BT_DelSheet_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BT_DelSheet.Click
ApExcel = New Excel.Application
Dim libro As Excel.Workbook = ApExcel.Workbooks.Add()
Dim hoja4 As Excel.Worksheet
hoja4 = ApExcel.Worksheets(1)
'hoja4 = CType(ApExcel.ActiveWorkbook.Sheets(4), Excel.Worksheet)
hoja4 = CType(libro.Sheets("Hoja4"), Excel.Worksheet)
hoja4.Delete()
End Sub
Valora esta pregunta
0