如何利用EXCEL批量插入图片

目录

1.excel打开目标表格;

2.点开视图-宏-录制宏,可以改宏的名字或者选择默认;

3.然后点开视图-宏-查看宏

4.点编辑进去

5.修改代码:

(1)打开之后会显示有一堆代码

(2)将这个代码只要改地址直接贴到步骤(1)的模块代码

6.同时将代码放在txt文档,并放在图片所在文件夹;

7.插入图片:在excel修改插入图片的名字,和目标图片名字一致;然后选择目标图片名并点击"查看宏",再点击"执行"运行;

8.运行完即将图片批量插入;


1.excel打开目标表格;

2.点开视图-宏-录制宏,可以改宏的名字或者选择默认;

3.然后点开视图-宏-查看宏

4.点编辑进去

5.修改代码:

(1)打开之后会显示有一堆代码

(2)将这个代码只要改地址直接贴到步骤(1)的模块代码

(3)呈现如图

复制代码
Sub 批量插图()
On Error Resume Next
Application.ScreenUpdating = False
Dim MR As Range,sPath As String
sPath = "D:\临时" '设置图片位置
For Each MR In Selection
If Not IsEmpty(MR) And Dir(sPath & "\" & MR.Value & ".jpg") <> "" Then
MR.Select
ML = MR.Left
MT = MR.Top
MW = MR.Width
MH = MR.Height
ActiveSheet.Shapes.AddShape(msoShapeRectangle, ML, MT, MW, MH).Select
Selection.ShapeRange.Fill.UserPicture _
sPath & "\" & MR.Value & ".jpg"
End If
Next
Set MR = Nothing
Application.ScreenUpdating = True
End Sub

6.同时将代码放在txt文档,并放在图片所在文件夹;

7.插入图片:在excel修改插入图片的名字,和目标图片名字一致;然后选择目标图片名并点击"查看宏",再点击"执行"运行;

8.运行完即将图片批量插入;

相关推荐
Fireworkitte7 小时前
Apache POI 详解 - Java 操作 Excel/Word/PPT
java·apache·excel
Prodigy_kyw12 小时前
VBA初学3----实战(VBA实现Excel转csv)
excel·vba·csv
红衣女妖仙15 小时前
JXLS 库导出复杂 Excel
java·excel·jxls·java 导出 excel
吃我两拳18 小时前
EasyExcel停止当前Sheet的读取,且不影响主线程及其他Sheet读取的方法
excel
qq_3938282221 小时前
办公文档批量打印器 Word、PPT、Excel、PDF、图片和文本,它都支持批量打印。
windows·word·powerpoint·excel·软件需求
过期的秋刀鱼!1 天前
用“做饭”理解数据分析流程(Excel三件套实战)
数据挖掘·数据分析·excel·powerbi·数据分析入门
挑战者6668881 天前
如何将Excel表的内容转化为json格式呢?
excel
干净的坏蛋1 天前
EasyExcel实现Excel复杂格式导出:合并单元格与样式设置实战
excel
张太行_10 天前
MySQL与Excel比较
数据库·mysql·excel
cwtlw11 天前
Excel学习03
笔记·学习·其他·excel