Visual Basic - imagenes a Excel 2010

Life is soft - evento anual de software empresarial
   
Vista:

imagenes a Excel 2010

Publicado por Eduardo (47 intervenciones) el 11/09/2010 18:32:29
Tengo este código que me funcione perfectamente para exportar imagenes (fotografias) a Excel 2003, pero cuando lo ejecuto con Excel 2007 o 2010 las fotos no caen en la celda especificada.

ApExcel.Range("J5").Select
ApExcel.ActiveSheet.Pictures.Insert("\Ventas\Fotos\" + Trim(trp.trcodori) + ".JPG").Select

ApExcel.ActiveSheet.Application.CommandBars("Task Pane").Visible = False
ApExcel.Selection.ShapeRange.LockAspectRatio = msoTrue

ApExcel.Selection.ShapeRange.Height = 70.87
ApExcel.Selection.ShapeRange.Width = 73#
ApExcel.Selection.ShapeRange.Rotation = 0#
ApExcel.ActiveSheet.Rows(Trim(Str(5))).RowHeight = 71

Ejecute el macro en el Excel 2010 para obtener el código correspondiente, pero obtengo el mismo código que muestro en este ejemplo, es decir no hay cambios.
Donde está la falla?

Gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder