[求助]图形按尺寸比例伸缩的VBA代码？

wangli555 · 发表于 2005-2-21 13:19

如题：

ynWVoBgg.rar (2.45 KB, 下载次数: 110)

wangli555 · 发表于 2005-2-21 14:17

怎么？没人指教？

zhoujibin1 · 发表于 2005-2-21 14:26

Sub DD() w = InputBox("输入宽度比例：") h = InputBox("输入高度度比例：") Selection.ShapeRange.ScaleHeight w, msoFalse, msoScaleFromBottomRight Selection.ShapeRange.ScaleWidth h, msoFalse, msoScaleFromTopLeft

End Sub

wangli555 · 发表于 2005-2-22 13:15

谢谢!!

学习中!!

FENGJUN · 发表于 2005-2-22 13:51

什么是“宽度比例”和“高度比例”？

用户名		自动登录	找回密码
密码			免费注册

[求助]图形按尺寸比例伸缩的VBA代码？

浏览过的版块