Pregunta

En Excel 2007, es posible escalar un objeto pictureLink (creada con la cámara de la herramienta) usando el siguiente código VBA.

With ActiveWorkbook.Sheets(sht).Pictures(name)
    .ShapeRange.ScaleWidth scaleValue, msoTrue
    .ShapeRange.ScaleHeight scaleValue, msoTrue
    .top = top
    .left = left
End With

Este código coloca la imagen correctamente en 2010, pero la scaleValue se ignora. La documentación de Excel 2010 es irregular sobre este tema. El mismo código funciona bien en Excel 2007.

¿Fue útil?

Solución

En Excel 2010, sorprendentemente, estableciendo el ScaleValue al 75% de lo que es en Excel 2007, hace el truco. Por lo que se necesita para crear el código VBA para probar Application.Version.

Licenciado bajo: CC-BY-SA con atribución
No afiliado a StackOverflow
scroll top