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程序代码截图