首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

Excel2007怎么用宏控制粘贴图片的大小

2012-01-06 
Excel2007如何用宏控制粘贴图片的大小?Excel2007如何用宏控制粘贴图片的大小?貌似记录的宏中生成不了改变

Excel2007如何用宏控制粘贴图片的大小?
Excel2007如何用宏控制粘贴图片的大小?貌似记录的宏中生成不了改变粘贴图片大小的代码呀

[解决办法]
Excel2003使用者路过帮顶
[解决办法]
我也想知道,帮顶
[解决办法]
将图片(objshape)的宽和高变成原来的(xrate,yrate)倍,也可以直接设定宽和高,
根据自己的需要 设定参数
sub setsieze(byref objshape as shape ,byval xrate as double, byval yrate as double)
dim x,y 
x = objshape.width * xrate
y = objshape.hength * yrate
objshape.width = x
objshape.hength = y
end sub
[解决办法]
ActiveSheet.Pictures.Insert( "D:\My Documents\My Pictures\样品.jpg ").Select 
Selection.ShapeRange.ScaleWidth 0.62, msoFalse, msoScaleFromTopLeft 
Selection.ShapeRange.ScaleHeight 0.62, msoFalse, msoScaleFromTopLeft 
Selection.ShapeRange.IncrementLeft 96# 
Selection.ShapeRange.IncrementTop 81#

热点排行