ejecutar Macros en excel
Publicado por Silvia Carrizo (12 intervenciones) el 08/09/2006 18:19:59
Hola:
Estoy haciendo una planilla excel a la cual le quiero insertar imagenes.
Como desde genexus no encontre funciones (si hay por favor me dicen cuales?,gracias)
en la planilla cree una macro que lo realiza.
Ahora bien me devuelve genexus error de que no se pudo ejecutar la macro donde estara errada?
Este es el codigo
&Excell.Cells(&GXRow,14).Text = &ArtPreVen4
&Excell.Cells(&GXRow,15).Text = &Dolares4
&err = &Excell.RunMacro('Insertar',ArtPic,&GXRow,16)
y desde el excel
Macro
Sub Insertar()
Dim myPic As Object
Range("j2").Select
Set myPic = ActiveSheet.Pictures.Insert("C:\copy.bmp")
With myPic
.Height = 50
.Width = 50
End With
End Sub
Gracias, Saludos Silvia Carrizo.
Estoy haciendo una planilla excel a la cual le quiero insertar imagenes.
Como desde genexus no encontre funciones (si hay por favor me dicen cuales?,gracias)
en la planilla cree una macro que lo realiza.
Ahora bien me devuelve genexus error de que no se pudo ejecutar la macro donde estara errada?
Este es el codigo
&Excell.Cells(&GXRow,14).Text = &ArtPreVen4
&Excell.Cells(&GXRow,15).Text = &Dolares4
&err = &Excell.RunMacro('Insertar',ArtPic,&GXRow,16)
y desde el excel
Macro
Sub Insertar()
Dim myPic As Object
Range("j2").Select
Set myPic = ActiveSheet.Pictures.Insert("C:\copy.bmp")
With myPic
.Height = 50
.Width = 50
End With
End Sub
Gracias, Saludos Silvia Carrizo.
Valora esta pregunta


0