VBA如何实现插入图片?

打开要插入图片的文档。找到要插入图片的位置,单击鼠标,鼠标出现闪烁状态。在菜单栏点击“插入”——“图片”——“来自文件”。在插入图片的对话框中,找到要插入的图片,选中,单击“插入”按钮即可把图片插入文档中。简介...

会用VBA吗,先在word里面插入图片录制宏,然后将录制的VBA代码修改成.net代码就可以了

Len(tmpstring)-4)EndFunction执行此代码后,弹出的选择对话框,全选目标文件夹下的所有图片文件之后,点击确定。然后静静的等待电脑完成处理工作,次数word会进入无响应状态。图片越多,无响应的时间越长。

}

非常感谢! 我加上这句,执行后没有报错误,但是比如我把图片改名为pic4 ,然后尝试删除这个图片,但是删除语句提示是无效的属性或参数
}

我们在Excel中插入图片一般使用Picture集合的Insert方法。但是随着Excel版本的演进,在不同的版本指间插入图片还是有一些差别。

下面是Excel2003中的代码。其中Insert方法中的文件路径的文件夹分界符可以是””也可以是”/”。另外,设置LoctAspecRatio属性为True并不能固定长宽比,需要同时调整长度和宽度。

'设置图片显示固定宽度

'获取图片插入后的原始宽度

'获取拉伸比,如果固定显示高度的话用Height属性

'Excel2003中设置固定长宽比不起作用'

Excel2007中插入图片的代码基本上一样。但是Insert方法中的文件路径的文件夹分界符只能是””。另外设置固定长宽比在Excel2007中有效,所以只需要设置宽度即可。还有一个不同的地方是2007中使用代码插入图片后,图片并不定位于当前选择的单元格,需要设置图片的位置。

'设置图片显示固定宽度

'获取图片插入后的原始宽度

'获取拉伸比,如果固定显示高度的话用Height属性

'设置固定长宽比,默认为True

'不需要重复设置高度'

'Excel2007和2003不同,使用代码插入图片的位置并不位于选择的单元格

2007的代码可以用于2010,但是当保存文件时,你会发现文件的大小并没有什么改变,实际上在Excel2010里使用代码插入图片只是保存了指向图片的链接,图片本身并没有保存下来。当源图片文件被删除或移走,Excel文件将不能显示图片。一个简单的方法是将图片剪切一下,然后重新粘贴,这样Excel文件中将在保存时包含图片。同时,Cut方法的位置放在ScaleWidth前或者后将影响图片的保存质量。

'设置图片显示固定宽度

'获取图片插入后的原始宽度

'获取拉伸比,如果固定显示高度的话用Height属性

'设置固定长宽比,默认为True

'不需要重复设置高度'

'Excel2010和2007不同,插入的图片位于当前选择的单元格,不需要设置位置'

'剪切粘贴图片让文件保存的时候包含图片


在不同版本 Excel 中插入图片 VBA代码的下载地址:

}

我要回帖

更多关于 vba 数组赋值 的文章

更多推荐

版权声明:文章内容来源于网络,版权归原作者所有,如有侵权请点击这里与我们联系,我们将及时删除。

点击添加站长微信