6.3 AddPicture次第“自拍偷拍”

Shapes.AddPicture次第不错在指定的位置插入图片“自拍偷拍”。咱们先看一下它的语法结构：

AddPicture(FileName、连气儿到文献、随文档保存、Left、Top、Width、Height)

FileName：图片的旅途及名字（带彭胀名）

连气儿到文献、随文档保存：两个参数王人填True或1，图片不错保存在责任簿中

Left、Top、Width、Height：图片的左角落、顶部、宽度、高度

日常在设施里咱们王人是这么写的：“自拍偷拍”

ActiveSheet.Shapes.AddPicture 文献旅途及名字， 1， 1， 左， 顶， 宽， 高

比如咱们念念在“a1”单位格插入一张图片，这个图片位于“F:\VBA学习\Nature”目次下，名字是“img1.jpg”，咱们就不错这么作念：

Sub 插入图片()

地址 = 'F:\VBA学习\Nature\img1.jpg'

左 = [a1].Left

顶 = [a1].Top

宽 = [a1].Width

高 = [a1].Height

国产gv

ActiveSheet.Shapes.AddPicture 地址， 1， 1， 左， 顶， 宽， 高

End Sub

领先获得要插入图片的旅途及带彭胀名的名字，把它赋值给“地址”变量。然后获得“a1”单位格的左、顶、宽、高，终末用AddPicture次第插入图片。效力如下：

图片

本站仅提供存储奇迹，悉数实践均由用户发布，如发现存害或侵权实践，请点击举报。