表格关联文件夹中的图片

A. 如何让Excel单元格对应关联显示外部文件夹图片

VBA可以做到

PrivateSubWorksheet_Change(ByValTargetAsRange)

DimrgAsRange
DimadAsString
DimtpAsString
Dimw,hAsLong
ad="D:图片"

ForEachrgInTarget
Ifrg.Column=1Andrg.Value<>""Then
tp=ad&rg.Value&".jpg"
rg.Offset(0,1).Select
ActiveSheet.Pictures.Insert(tp).Select
WithSelection
w=rg.Offset(0,1).Width
h=rg.Offset(0,1).Height
Debug.Printw,h
.ShapeRange.LockAspectRatio=msoFalse
.ShapeRange.Width=w
.ShapeRange.Height=h
.Placement=xlMoveAndSize
.PrintObject=True
EndWith
EndIf
Nextrg

EndSub

代码只适用于JPG格式的图片，如果是其他格式，可以手动把代码里的JPG改成其他格式试试

B. 如何让excel里的内容与其他文件夹里的图片建立超链接

方法一：右击单元格点击超链接
1、鼠标点击需要链接文字所在单元格——右击——在下来列表中找到“超链接（H）……”——点击打开超链接对话框。
2、在对话框中找到超链接文件的位置——点击确定，就OK啦。
方法二：用“HYPERLINK”函数建立超链接
1、用鼠标点击需要建立超链接的单元格——点击函数图标——在打开的函数对话框中找到超链接函数“HYPERLINK”，点击打开。
2、在打开的超链接函数中在Link-location中输入链接的位置，在Friendly-name中输入链接提示名。这就OK啦。

C. 请问在excel表格中怎么关联图片

根据题目描述，D:图片 文件夹下存放照片，在单元格输入照片名字，想显示对应图片。

操作步骤如下：

1. 在表格中，按ALT+F11键，把以下代码粘贴进去：

   Private Sub Worksheet_Change(ByVal Target As Range)
   If Target.Address <> "$C$2" Then Exit Sub
   On Error Resume Next
   ActiveSheet.Shapes("pic").Select
   Selection.ShapeRange.Fill.UserPicture "D:图片" & Range("C2").Value & ".jpg"
   ActiveCell.Select
   End Sub

2. 在工作表中插入一个图形如矩形，在名称框输入pic命名。

3. 在C2输入图片名，调整pic至合适大小。当C2改变时，pic显示对应路径下不同图片。