Excel中怎么利用宏使在一个单元格输入内容后自动插入图片

2024-10-30 14:11:58
推荐回答(4个)
回答1:

图片和excel工作薄必须在同一个文件夹下
假设输入内容的单元格在第一列
在工作表名称上点右键选查看代码,粘贴以下代码到弹出窗口.关闭弹出窗口
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Then
sfileName = ThisWorkbook.Path & "\" & Target.Value & ".jpg"
On Error GoTo err01
With Target.Offset(0, 1)
Shapes.AddPicture(sfileName, True, True, .Left, .Top, .Width, .Height).Select
Selection.Placement = xlMoveAndSize
End With
End If
Cells(1, 1).Select
Exit Sub
err01:
If err.Number = 1004 Then MsgBox "当前目录下没有名称为:" & Target.Value & ".jpg,的图片"
End Sub

回答2:

你的目的是想像人事管理那样,输入一个名字,后面一个格子就出来一个头像
用宏可以实现,给你提供解决思路
1、监测CHANGE过程,当某列特殊单元格(如姓名)变化时,启动处理过程
2、检测单元格的行,列,值
3、根据值到指定目录查找符合要求的图片
4,根据目标单元格的插入图片单元格的TOP、LEFT、HIGHT、WIDTH,把图片插入,并设置图片的左上角与那个图片单元格位置固定,并适当调整图片的高和宽,使适应单元格

回答3:

参考下我的回答

回答4:

那你插入图片是根据什么来的,图片具体在哪个位置