excel同一表格中图片与文字如何关联
发布网友
发布时间:2022-04-24 12:46
我来回答
共1个回答
热心网友
时间:2023-10-13 07:05
首先文字与图片的文件名字要一样,需插入image图像控件,再使用单元格selectionchange事件,达到点击单元格弹出图片的效果。
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, [a1:a2]) Is Nothing Then
tup.Picture = LoadPicture(ThisWorkbook.Path & "\" & Target.Value & ".jpg")
tup.Top = Target.Top
tup.Left = Target.Left + Target.Width
End If
End Sub