excel 用VBA 编写宏，调用图片问题？

2025-03-01 12:00:28

推荐回答（1个）

回答1：

根据楼主的描述，个人觉得在VBA代码里边加入一个取消/允许触发连锁事件的语气就可以了，当双击C7单元格并回车之后，才会执行这些程序，引用改变的单元格无效（不会执行程序）。

示例如下：

Option Explicit

Private Sub Worksheet_Change(ByVal T As Range)

Application.EnableEvents = False '禁止触发连锁事件

On Error Resume Next

If T.Address = "$C$7" Then

Me.Image1.Picture = LoadPicture(ThisWorkbook.Path & "\" & T.Value & ".jpg")

End If

If Err <> 0 Then MsgBox "此人没有照片", 16, "提示"

Application.EnableEvents = True '允许触发连锁事件

End Sub

VBA程序代码截图