SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => VBA => Mensaje iniciado por: SpeedCAD en Jueves 3 de Junio de 2004, 16:45

Título: Problemas Con Vb6.0 Y Excel
Publicado por: SpeedCAD en Jueves 3 de Junio de 2004, 16:45

Hola...

Tengo un archivo en Excel en que en una de sus hojas he insertado un control
Image. Luego desde Visual Basic ejecuto una aplicacion y hago activa la hoja
donde esta el objeto image, luego con lo siguiente:

HojaNueva.OLEObjects("Image1").object.Picture = LoadPicture(archivo)

Se supone que con eso puedo cargar una foto al control Image1 pero me manda un error diciendome que se a producido un error en el método Picture del objeto IImage.

Para verificar si solo es ese error he extraido la propiedad Name del objeto:

a = HojaNueva.OLEObjects("Image1").object.Name

Esto me da el nombre del objeto sin problemas, entonces asumo que tengo algun
error al momento de cargar la imagen.

Ademas he probado LoadPicture desde el editor VBA de Excel y ahi si me carga la
imagen poniendo el mismo codigo anterior...

Alguiente me podria decir donde esta el error??? :'(

Gracias..

Título: Re: Problemas Con Vb6.0 Y Excel
Publicado por: Brroz en Sábado 5 de Junio de 2004, 09:44

Hola SpeedCad.

El error tal vez venga dado por lo siguiente:

En excel la función LoadPicture es miembro de la biblioteca Stdole. En vb LoadPicture es miembro de la biblioteca VB. Esto lo puedes comprobar con el examinador de objetos.

Espero que esto sea la solución:

Código: Text

1.  
2. HojaNueva.OLEObjects("Image1").object.Picture = Stdole.LoadPicture(archivo)
3.  
4.  

Suerte.

Título: Re: Problemas Con Vb6.0 Y Excel
Publicado por: SpeedCAD en Lunes 7 de Junio de 2004, 03:16

Cita de: "Brroz"

Hola SpeedCad.

El error tal vez venga dado por lo siguiente:

En excel la función LoadPicture es miembro de la biblioteca Stdole. En vb LoadPicture es miembro de la biblioteca VB. Esto lo puedes comprobar con el examinador de objetos.

Espero que esto sea la solución:

Código: Text

1.  
2. HojaNueva.OLEObjects("Image1").object.Picture = Stdole.LoadPicture(archivo)
3.  
4.  

Suerte.

Hola Brroz...

Muchas gracias por responder... Lo probare en cuanto pueda y te comentare como me fue  :D. Espero que sea la solucion porque de lo contrario no se que mas pueda ser...

Título: Re: Problemas Con Vb6.0 Y Excel
Publicado por: SpeedCAD en Martes 8 de Junio de 2004, 15:32

Hola Brroz...

Puse lo que me dijiste en VB pero al probarlo me manda el mismo error que indique al principio del mensaje. :oops:

Hay alguna otra forma de cargar una imagen desde VB 6.0 a Excel en algun control OLE u otro????.

Lo que pasa es que estoy haciendo una aplicacion en VB 6.0 que lee un archivo en Excel, y desde VB manda a imprimir la hoja de Excel, todo eso me sale bien y no tengo ningun problema. El problema es cuando quiero cargar una foto en el control...

Espero que halla otro metodo :adios:

Título: Re: Problemas Con Vb6.0 Y Excel
Publicado por: SpeedCAD en Miércoles 16 de Junio de 2004, 18:53

Nobody can help me????

 :ayuda: