EXCEL Y VISUAL BASIC
Publicado por Xavi (1 intervención) el 03/11/2003 10:25:55
Con esta linea de codigo me da error el visual basic 6.0, en un Windows 200 service pack 4 y office 97 instalado.
On Error GoTo ErroresExcel
Set msExcelApp = GetObject("", "excel.application")
msExcelApp.Visible = False 'AQUI ME DA UN ERROR -2146960888 error en el metodo 'visible' del objeto _Application
ArchivoExcel = "C:\POFERTA.XLS"
Set msExcelFichero = Excel.Workbooks.Open(ArchivoExcel)
NomHoja = "OFERTA"
Set msExcelHoja = msExcelFichero.Worksheets.Item(NomHoja)
On Error GoTo 0
On Error GoTo ErroresExcel
Set msExcelApp = GetObject("", "excel.application")
msExcelApp.Visible = False 'AQUI ME DA UN ERROR -2146960888 error en el metodo 'visible' del objeto _Application
ArchivoExcel = "C:\POFERTA.XLS"
Set msExcelFichero = Excel.Workbooks.Open(ArchivoExcel)
NomHoja = "OFERTA"
Set msExcelHoja = msExcelFichero.Worksheets.Item(NomHoja)
On Error GoTo 0
Valora esta pregunta
0