Error al Grabar en Excel
Publicado por Ignacio Monserrat (2 intervenciones) el 08/08/2008 17:19:19
Hola a todos,
Tengo un problema al querer grabar en Excel 2003 desde VB 6.0... Al principio lo hacia bien y sin errores, pero ahora me sale el Error de automatizacion -2147417851 y se cierra el excel. Este es el fragmento de codigo en donde hago la grabacion:
ObjetoExcel.DisplayAlerts = False
wbWorld.Sheets("A1").Select
ActiveWindow.SelectedSheets.Delete
wbWorld.Sheets("A2").Select
ActiveWindow.SelectedSheets.Delete
wbWorld.Sheets("A3").Select
ActiveWindow.SelectedSheets.Delete
ObjetoExcel.DisplayAlerts = True
wbWorld.Save
wbWorld.Close
MsgBox "Proceso Terminado", vbOKOnly
Ya quite las referencias y las volvi a colocar, pero no funciona! Las referencias son: Microsoft Excel 11.0 Object Library, OLE Automation, Microsoft ActiveX Data Objects 2.1 Library
Alguna sugerencia o alguien que sepa lo que esta ocurriendo?
Tengo un problema al querer grabar en Excel 2003 desde VB 6.0... Al principio lo hacia bien y sin errores, pero ahora me sale el Error de automatizacion -2147417851 y se cierra el excel. Este es el fragmento de codigo en donde hago la grabacion:
ObjetoExcel.DisplayAlerts = False
wbWorld.Sheets("A1").Select
ActiveWindow.SelectedSheets.Delete
wbWorld.Sheets("A2").Select
ActiveWindow.SelectedSheets.Delete
wbWorld.Sheets("A3").Select
ActiveWindow.SelectedSheets.Delete
ObjetoExcel.DisplayAlerts = True
wbWorld.Save
wbWorld.Close
MsgBox "Proceso Terminado", vbOKOnly
Ya quite las referencias y las volvi a colocar, pero no funciona! Las referencias son: Microsoft Excel 11.0 Object Library, OLE Automation, Microsoft ActiveX Data Objects 2.1 Library
Alguna sugerencia o alguien que sepa lo que esta ocurriendo?
Valora esta pregunta
0
