EXCEL里面使用宏批量插入图片怎么做 有表格图片?

发布网友 发布时间：2022-04-23 06:10

我来回答

共3个回答

热心网友 时间：2022-05-27 09:18

介于图片太大，所以用批注的方法添加
Sub TEXT()
Dim RNG As Range, RNG1 As Range, COM As Comment, RNG2 As Range
Set RNG2 = Range("B:B")
RNG2.ClearComments
Set RNG = Range("A1", [A1].End(xlDown))
For Each RNG1 In RNG
P = "C:\Users\Administrator\Desktop\vba\Shapes\VBA基础-6.6批量在批注中插入照片_素材文件 (课程素材及源文件仅供练习学习使用,不可直接商用)\员工照片\" & RNG1.Value & ".jpg"
Set COM = RNG1(1, 2).AddComment
COM.Shape.Width = 150
COM.Shape.Height = 200
COM.Shape.Fill.UserPicture P
Next
End Sub

热心网友 时间：2022-05-27 09:19

下载EXCEL插件： EXCEL精灵。或者方方格子。里面好多功能，。批量工能

热心网友 时间：2022-05-27 09:19

方法我会啊
就是要写代码,
代码我也会啊!