我在窗体上画了个图，然后保存到剪切板，再把它粘贴到EXCEL文档。
是这个样子。

图片太大了，不协调，怎么实现缩放啊？谢谢！

我在粘贴完图片的语句后面加了几句代码：
Selection.ShapeRange.ScaleHeight 0.5, msoFalse, msoScaleFromTopLeft
If Application.Version < 12 Then
    Selection.ShapeRange.ScaleWidth 0.5, msoFalse, msoScaleFromTopLeft
End If
可是运行出错。


请问高手，哪里有错啊？谢谢！

谢谢！我在分辨率是1280*1024的时候是可以的，如图：

可是在电脑分辨率是1280*768时，就不行，改宽度也没用，成这样了。

请问应该怎么解决呀？

谢谢！我试试。