• Lunes 23 de Diciembre de 2024, 10:13

Autor Tema:  Problema Con Excel  (Leído 1981 veces)

jodijo5

  • Miembro HIPER activo
  • ****
  • Mensajes: 518
  • Nacionalidad: pe
    • Ver Perfil
    • http://www.bluetecnologia.com
Problema Con Excel
« en: Lunes 3 de Octubre de 2005, 17:26 »
0
hola amigos, tengo que hacer una aplicacion que haga un analisis estadistico en excel, agreggo la referencia correspondiete, y declaro las siguientes variables
Código: Text
  1.  
  2. private wbook as new excel.workbook
  3. private wsheet as new excel.worksheet
  4. private xc as new excel.application
  5.  
pero me da error, no se porque, incluso si le quito el "new";
porfavopr ayudenme, gracias de antemano, no les paso mi codigo porque no lo tengo a la mano esta es una pc prestada ya que la mia no tiene internet.

chaofas
=============================
Daniel Pomalaza Mendoza
visita el Dinosaurio Azul :-D
http://bluetecnologia.com

senzao18

  • Miembro HIPER activo
  • ****
  • Mensajes: 553
    • Ver Perfil
Re: Problema Con Excel
« Respuesta #1 en: Martes 4 de Octubre de 2005, 16:43 »
0
¿¿¿¿Podrias decir que error es????


¿¿¿Que es lo qye te marca????
---------------------------------------
Erick Aragon Zepeda
Dessarrollo de Aplicaciones .NET
http]
Blog de Articulos
Mi Blog
NoSolocodigo -->

jodijo5

  • Miembro HIPER activo
  • ****
  • Mensajes: 518
  • Nacionalidad: pe
    • Ver Perfil
    • http://www.bluetecnologia.com
Re: Problema Con Excel
« Respuesta #2 en: Miércoles 5 de Octubre de 2005, 00:38 »
0
mejor te mando la aplicacion, en fin es solo para que me ayude en mi curso de estadistica 1.

el error que memanda es:
Citar
An unhandled exception has occurred in your application. if you click Continue, the application will ignore this error and attempt tocontinue.
If you click Quit, the application will be shut down inmeditely.
QueryInterface for interface Excel_worksheet failed
El mensaje contiene 1 archivo adjunto. Debes ingresar o registrarte para poder verlo y descargarlo.
=============================
Daniel Pomalaza Mendoza
visita el Dinosaurio Azul :-D
http://bluetecnologia.com

senzao18

  • Miembro HIPER activo
  • ****
  • Mensajes: 553
    • Ver Perfil
Re: Problema Con Excel
« Respuesta #3 en: Miércoles 5 de Octubre de 2005, 16:51 »
0
Pues dajeme decirte que conmigo salio todo bien no marco error esto es lo que sale en el documento excel
Citar
Muestra  Li   Ls   Xmi   fi   Fi   hi   Hi   hi%   Hi%   Gº
 

Y con muchos numeros..

mmmm Asi que el código esta bien y esta axacto, por lo que podria pensarse muchas cosas......
El mensaje contiene 1 archivo adjunto. Debes ingresar o registrarte para poder verlo y descargarlo.
---------------------------------------
Erick Aragon Zepeda
Dessarrollo de Aplicaciones .NET
http]
Blog de Articulos
Mi Blog
NoSolocodigo -->

jodijo5

  • Miembro HIPER activo
  • ****
  • Mensajes: 518
  • Nacionalidad: pe
    • Ver Perfil
    • http://www.bluetecnologia.com
Re: Problema Con Excel
« Respuesta #4 en: Miércoles 5 de Octubre de 2005, 22:53 »
0
te digo lo que pasó, este mismo programa, quise correrlo con excel 2003 pero en ingles, seguro no te dio ningun error porque estabas trabajando con excel wen español, mientras hacia el porgrama, tenia mucho cuidado en no utilizar la funciones de excel, tales como =suma(), etc, en resumen todas las que comienzan con "="; con el fin de tener compatibilidad entre las dos librerias, el error lo produce cuando ejecuto con el excel en ingles, pues lo hice con el excel en español. tal parece que el problema es esa libreria, pero incluso le cambie de libreria, al de ingles, pero igual me daba error.

que me recomiendas
=============================
Daniel Pomalaza Mendoza
visita el Dinosaurio Azul :-D
http://bluetecnologia.com

senzao18

  • Miembro HIPER activo
  • ****
  • Mensajes: 553
    • Ver Perfil
Re: Problema Con Excel
« Respuesta #5 en: Jueves 6 de Octubre de 2005, 16:29 »
0
No  uses la libreria, yo lo hago de la siguiente manera para no depender del excel..

Código: Text
  1.  
  2. Dim isExcelOpen As Boolean = False
  3.  
  4.             Dim xlapp
  5.             Dim wbxl
  6.             Dim wsxl
  7.  
  8.             Dim intRow As Integer 'counter
  9.  
  10.             Dim oRow As DataRow
  11.  
  12.             On Error Resume Next
  13.             xlapp = GetObject(, "Excel.Application")
  14.             If xlapp Is Nothing Then
  15.                 xlapp = CreateObject("Excel.Application")
  16.                 If xlapp Is Nothing Then
  17.                     MsgBox("Necesita Microsoft Excel para utilizar esta opción.", vbCritical, "Auditoría de Retiros")
  18.                     Exit Sub
  19.                 End If
  20.             Else
  21.                 xlapp = CreateObject("Excel.Application")
  22.             End If
  23.  
  24.             wbxl = xlapp.Workbooks.Add
  25.             wsxl = xlapp.Sheets(1)
  26.  
  27.  
---------------------------------------
Erick Aragon Zepeda
Dessarrollo de Aplicaciones .NET
http]
Blog de Articulos
Mi Blog
NoSolocodigo -->