摄影按扭为何不受vba控制?

鱼之乐 · 发表于 2002-12-31 21:28

摄影工具是一个很不错的东东,一方面它粘贴成的区域(照片)确实是个图片,你不能修改它上面数据,另一方面,当源数据发生改变时,这个照片却能同步更改.这不正好可以满足一些希望别人不能修改源数据的一些场合吗? 可是,我却一时不能用vba来控制这个"照相机",当我打开录制宏时,再操作照相机,就发现不能正常贴照片出来,而且录制出的代码也面目全非,没半点照相机的影子. 不知哪位大吓对此有研究?

MOUS100 · 发表于 2002-12-31 22:29

用VBA动态创建好像是不行，不过可以先手工创建一个"照片"，此照片Shape的Type为msoPicture（13），具有隐含属性Formula ，通过其Formula属性，可以随意控制其显示的区域！

[此贴子已经被作者于2002-12-31 22:29:14编辑过]

鱼之乐 · 发表于 2003-1-1 11:11

谢谢二位的答复! 祝新年快乐!万事如意

Tom_HYQ · 发表于 2003-1-2 09:32

看了几位的讨论学会了不少，谢谢!

czww · 发表于 2003-1-2 09:45

打哈欠好像有过一个类似的东东，不知道和鱼版主的一样不？

大头 · 发表于 2003-1-1 10:11

由于EXCEL中无论手工或VBA都不能插入一个空的图片，鱼老的“自动照相机”因此卡壳。多走一步可达到目的 Sub Macro1() Set pict = ActiveSheet.Pictures.Insert("C:\WINDOWS\SETUP.BMP") pict.Formula = "A1:E10" pict.ShapeRange.Fill.Visible = msoTrue pict.ShapeRange.Fill.ForeColor.SchemeColor = 9 pict.Select End Sub 其实“照相机”的工作原理就是给图片赋公式，手工操作如下：插入图片，选中它，在编辑栏里填写公式，设置图片填充色，OK 还有很多东东可以赋公式，如自选图形、控件、艺术字等。

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