在Excel中动态查图片，这个技巧其实应用很广泛，比如：人力资源部可以根据员工编号，查找员工照片；生产部门可以根据工单，查找工序加工图片；图书管理员根据借书证编号，查找对应的会员照片等等。

下面的图片演示，当选择了不同的姓名时，会显示出该人员对应的分数，以及人员对应的照片：

下面，我们就一步一步地，一起来制作这个简单的照片查找效果。

准备查询源数据

在A:B列输入查询源数据，C列的照片是通过插入图片的方式，一张一张插入的，并调整好每张图片的位置和尺寸，以和单元格对齐；

——逐个图片地调整尺寸，确实是个功夫活儿，在我的微课中，给大家介绍过一段快速批量调整图片尺寸的VBA代码，有需要的同学可以留言索取哦——

制作“姓名”下拉

在E2单元格设置数据验证，序列来源为“=$A$2:$A$6”，即引用到源数据中的所有姓名所在的单元格区域。

查找“分数”

在F2单元格输入公式：=INDEX(B2:B6,MATCH(E2,A2:A6,0))

“分数”公式的含义：

1、 INDEX函数在“分数”列中进行查找，当前选择的人员对应行的数据。

2、 那么当前选择的人员到底在第几行呢？由MATCH函数来定位。

3、 MATCH函数在“姓名”列中，查找E2单元格的值（即当前选择的人员）处于第几行，并将结果返回给INDEX，从而由INDEX函数返回选择人员的分数。

查找“照片”

我们能用与“分数”相同的方法来查找“照片”吗？大家可以试试，其实并不能的，单元格中通过公式，是没法直接返回图片对象的。

我们可以这样做：

1、定义名称“照片”：

由于定义名称时，Excel并不提供智能的屏幕提示，所以，先在G2单元格中输入名称将要用到的公式：

=INDEX(动态查图片!$C$2:$C$6,MATCH(动态查图片!$E$2,动态查图片!$A$2:$A$6,0))

这个公式的原理，与上一步的“分数”是完全一样的，从这里返回的“0”也能看出，直接输入单元格引用公式是行不通的。

提示：公式中的各个单元格引用，记得按F4键进行固定，否则后面会出现名称的“引用无效”问题。

复制G2单元格中的公式，点击“公式”-“定义名称”按钮，在“引用位置”中粘贴公式，并为名称命名为“照片”（当然，可以修改成你喜欢的其它名称）。

删除G2单元格的公式。

相应地，在名称管理器中，就能看到这个新增的名称了。

2、设置图片引用：

将任意一张照片复制到G2单元格，该照片处于选中状态，在公式编辑栏中输入公式：=照片，按Enter确定。

测试一下，下拉选择不同姓名，照片G2单元格的照片已经能跟着动态变化了。

新增源数据怎么办？

但是，当我们新增了源数据怎么办？需要再修改公式吗？

不用！我们只需多做一件事情就好了，点击“插入”-“表格”按钮，或者CTRL+T快捷键，将源数据区域转换为“表格”。

当我们新增了源数据包括图片后，姓名下拉选项也跟着增长了，而选择新增的姓名后，“分数”、“照片”的查询也都工作良好，能给出正确的结果。

在Excel中动态查图片，这个小技巧，你get到了吗？那就赶紧用起来吧。

像下面一张销售表（图1），除了数据没有其他的图表，看着比较枯燥，如果我们能在后面增加一个折线图（图2），来表明全年的销售动态的变化情况，是不是看着就比较直观了，比较直观的看出来哪个月最大，哪个月最小，哪个月增长多，哪个月又降得多。下面我就分享一下插入折线图的方法。

图1

图2

插入这样的折线图，利用的是excel中迷你图工具选项，在工具栏插入—迷你图选项下，有折线图、柱形图、盈亏3种迷你图，今天我就分享一下插入迷你图，其他2种方法都是一样的。

插入迷你图很简单，方法如下图。

是不是很简单哦。具体方法为：

1、选中要插入迷你图的位置的单元格，点击工具栏插入，在迷你图选项中点击折线图。

2、在弹出的创建迷你图对话框中，在数据范围选择你要创建迷你图的数据区域，点击确定，就自动插入折线迷你图了。然后下拉复制，就可以对下面数据行的数据创建迷你图。

好了迷你图创建好了。点击迷你图，在工具栏出现迷你图工具，点击设计选项，我们可以对迷你图进行修改。

点击迷你图颜色，可以选择自己喜欢的颜色。

默认的折线迷你图线条比较细，我们将线条改粗一些，点击迷你图颜色—粗细，修改线条的粗细。

也可以在显示选项中，勾选高点和低点，显示折线图的最大值和最小值。

好了迷你图制作好了，喜欢的关注我，会分享更多的小知识。

分享 Excel 批量图片导入功能，使单元格高度和宽度适应图片。

Excel 批量图片导入功能，很多插件有这个功能，大部分插件的导入功能都是使图片适应单元格的大小，

但是这点可能跟很多人的实际需求不一样，因此我单独写了一个图片导入功能，使单元格适应图片的大小。

代码缺点，需要手工替换代码中的 .png 图片格式为你 自己需要导入的 图片文件格式.

附上代码：

Sub 导入图片()

Dim wenjian_geshu

Dim lujin

Dim tupian_name

Dim zonghe_bi

Dim hanggao

Dim tishi_kuozhangming

tishi_kuozhangming = MsgBox(vbCrLf & "请确认是否需要 修改 程序代码的 文件扩展名 ？ " & vbCrLf & vbCrLf _

& "点击 “确定” 退出程序，并修改程序扩展名；" & vbCrLf & vbCrLf _

& "点击 “取消” 继续导入图片。" & vbCrLf & vbCrLf _

, vbOKCancel)

If tishi_kuozhangming = vbOK Then Exit Sub

wenjian_geshu = 0

lujin = InputBox("请输入图片文件夹路径，可以贴入路径")

If lujin = "" Then Exit Sub

tupian_name = Dir(lujin & "*.png", vbNormal)

'.png 格式可以更改为其他格式，用于显示其他格式的图片，

'.png 可以替换为 .* 任意文件格式，但是为了避免 ActiveSheet.Shapes.AddPicture(lujin & "" & ActiveSheet.Cells(wenjian_geshu, 1).Text & ".png", _ 程序出错，暂时不替换

'但是可以新建不同的工作簿，再导入不同格式的图片后，将表格合并为一张表格。

'不可以在同一工作簿的不同表格中重复执行 代码，即使将 新建分页表 的 名称改为 Sheet1 也不可以，因为本人水平有限不会修改测试了。希望能有大神优化下代码。

Do

If tupian_name = "" Then '输出图片名称 到 第 1 列

Exit Do

End If

wenjian_geshu = wenjian_geshu + 1

ActiveSheet.Cells(wenjian_geshu, 1).Select '方便查看执行到哪一行了

ActiveSheet.Cells(wenjian_geshu, 1) = tupian_name '输出图片名称

Rows(wenjian_geshu).RowHeight = 409 '设置行高为 Excel 的最大值 409

Columns(5).ColumnWidth = 255 '设置列宽为 Excel 的最大值 255

Dim tupian

Set tupian = ActiveSheet.Pictures.Insert(lujin & "" & ActiveSheet.Cells(wenjian_geshu, 1).Text)

With tupian

.ShapeRange.LockAspectRatio = msoTrue '锁定纵横比

.Placement = xlMoveAndSize '图片大小和位置随单元格的大小和位置而改变。

.Top = ActiveSheet.Cells(wenjian_geshu, 5).Top + 4

.Left = ActiveSheet.Cells(wenjian_geshu, 5).Left + 4 '两行代码设置图片左上角位置，对其单元格，距离单元格边距为 4

zonghe_bi = .Width / .Height '取得图片的 长宽比，以便后续图片的实际高度超过行高的时候，重新设置图片宽度，以保持图片缩小后的长宽比例

Cells(wenjian_geshu, 2) = Int(.Height) + 1

hanggao = Cells(wenjian_geshu, 2) + 3

If hanggao > 409 Then '不超过 409 则就使用上一行代码图片的默认长度

.Height = 403 '超过 EXCEL 最大行高 409，则设置图片 高度为 403，并根据图片纵横比 重新设置图片的长度

.Width = zonghe_bi * .Height ' 根据图片综合比 重新设置图片的长度

Else '不超过 409 则就使用上一行代码图片的默认长度

Rows(wenjian_geshu).RowHeight = hanggao + 6

End If

Cells(wenjian_geshu, 6) = .Width '图片后面的第一列即表格的第六列存储

If wenjian_geshu > 1 Then

If Cells(wenjian_geshu, 6) < Cells(wenjian_geshu - 1, 6) Then Cells(wenjian_geshu, 6) = Cells(wenjian_geshu - 1, 6)

End If

'取得列宽最大值，以便循环结束后设置最大列宽

Cells(wenjian_geshu, 1) = Left(Cells(wenjian_geshu, 1), Len(Cells(wenjian_geshu, 1)) - 4) '重新输出图片名称，去掉扩展名。

Cells(wenjian_geshu, 7) = .Height '在执行 Delete 语句 删除 链接图片之前取得修改后的图片 宽 和 高的数据

Cells(wenjian_geshu, 8) = .Width

.Delete 'Pictures.Insert只能插入图片链接，不能将图片与表格一起保存，

'故 删除图片链接，改用 Shapes.AddPicture 导入图片，使图片与表格同时保存，以上全部代码用来设置行高和列宽，及 设置 取得 图片的 宽 和 高 ，使其适应单元格的 高 和 宽

'.png 格式可以更改为其他格式，用于显示其他格式的图片，

ActiveSheet.Shapes.AddPicture(lujin & "" & ActiveSheet.Cells(wenjian_geshu, 1).Text & ".png", _

False, _

True, _

ActiveSheet.Cells(wenjian_geshu, 5).Left + 4, _

ActiveSheet.Cells(wenjian_geshu, 5).Top + 4, _

Cells(wenjian_geshu, 8), _

Cells(wenjian_geshu, 7)).Select '在第五列导入图片

Selection.ShapeRange.LockAspectRatio = msoTrue '锁定纵横比

Selection.Placement = xlMoveAndSize '图片大小和位置随单元格的大小和位置而改变。

End With

tupian_name = Dir '再次调用 dir 执行下面的图片的循环操作，不可以有参数，

'此句为整个代码断 最重要的语句，虽然我看不懂，但是直接用吧，有用就好了，知其然而不知其所以然好了。

Loop

Columns("E:E").Select

Selection.ColumnWidth = Int(Cells(wenjian_geshu, 6) / 5.9) '设置列宽为最大图片的列宽，5.9 为图片宽度 与 Excel 表格的宽度比

Columns("A:A").Select

Columns("A:A").EntireColumn.AutoFit

Columns(6).Select

Selection.Delete Shift:=xlToLeft '设置完第 5 列的列宽后，删除存储最大列宽值的 第 6 列

Columns("F:XFD").Select

Selection.ColumnWidth = 8.11

Columns("B:D").Select

Selection.Delete Shift:=xlToLeft

Columns("C:D").Select

Selection.Delete Shift:=xlToLeft

Range("A1").Select

'可以通过删除和插入列 的代码，调整图片名称列 和 图片实际位置列 最终所在的位置列

ActiveSheet.UsedRange.Select '添加边框

Selection.Borders(xlDiagonalDown).LineStyle = xlNone

Selection.Borders(xlDiagonalUp).LineStyle = xlNone

With Selection.Borders(xlEdgeLeft)

.LineStyle = xlContinuous

.ColorIndex = 0

.TintAndShade = 0

.Weight = xlThin

End With

With Selection.Borders(xlEdgeTop)

.LineStyle = xlContinuous

.ColorIndex = 0

.TintAndShade = 0

.Weight = xlThin

End With

With Selection.Borders(xlEdgeBottom)

.LineStyle = xlContinuous

.ColorIndex = 0

.TintAndShade = 0

.Weight = xlThin

End With

With Selection.Borders(xlEdgeRight)

.LineStyle = xlContinuous

.ColorIndex = 0

.TintAndShade = 0

.Weight = xlThin

End With

With Selection.Borders(xlInsideVertical)

.LineStyle = xlContinuous

.ColorIndex = 0

.TintAndShade = 0

.Weight = xlThin

End With

With Selection.Borders(xlInsideHorizontal)

.LineStyle = xlContinuous

.ColorIndex = 0

.TintAndShade = 0

.Weight = xlThin

End With

MsgBox ("图片导入完成！")

Range("A1").Select

End Sub

程序执行完成以后，A列放置的数据为自己命名的图片名称，B列放置的为图片。

Excel 批量图片导入功能，使单元格高度和宽度适应图片

Excel表格设置添加漂亮的背景图片，一般都在需要打印的情况下会用到。比如：公告栏，中奖名单等打印的情况下，为了让表格打印出来看着不单调而设置添加背景图。

今天我就用一个销售表的案例来分享Excel表格如何添加漂亮的背景图片，让表格打印出来展示在公告栏上看起来不再单调。

Excel表格添加背景图效果

Excel报个添加漂亮的背景图片操作如下：

1、在【插入】选项卡中，插入图片（选择自己需要的图片）到Excel表格中；

在Excel表格中插入图片

2、复制需要的表格，右键——选择性粘贴——选择其他粘贴选项中的“链接图片”；

3、粘贴后，一张图片式表格出现，表格里面的内容与原表是一样的，关键是图片式表格中的数据是可以与原表数据同步变动的；

4、将粘贴的表格式图片移到刚才插入的背景图片上，即可完成Excel表格添加漂亮的背景图片设置。

Excel表格背景图片添加设置完成

最终的Excel表格添加漂亮的背景图片设置完成，如果有需要打印的可以设置打印区域进行打印。

今天分享的Excel表格如何添加漂亮的背景图片，让表格打印不再单调，希望对各位朋友在工作中有所帮助！

更多关于Office——Excel操作技巧可加入我们一起交流！

excel表格在制作过程中需要添加的一些图片，那么我们该如何操作呢？下面我们通过实例来介绍一下。

在电脑桌面上打开excel表格图标。

打开要处理的文件。

选择插入选项，选择插入图片。

选择要处理的图片，并且点击插入。

下图为插入图片的默认效果。很显然不是我们想要的结果图片在表格之外。

拖动图片的编辑框将图片缩小，如下图所示。

施老师：

在对一些图文进行排版的时候，我们始终不能很好的控制图片与文字之间的对齐，有时候调整就要费很大的劲。不过，今天施老师给大家分享一个小技巧，我们可以利用WORD表格来控制图文轻松使轻松使其排版对齐

说明：默认情况下，我们在Word文档中插入表格后，再在单元格内插入图片，我们可以看到，图片直接将单元格给撑爆了。那么，正确的方式应该怎样操作呢？

操作演示

1、首先，我们先插入表格，表格的行、列还是要根据自己的需求来定。这里我要插入一个4行、4列的表格。插入完成后，选中表格顶点，「右键」-「表格属性」-「表格」-「选项」，将底部的「自动重调尺寸以适应内容」取消勾选。

2、此时，我们再在单元格内插入图片，大家可以看到，此时的图片既然会自动变小，其实，此时插入的图片是“自动适应单元格大小”了。

3、这一步骤主要就是插入一些标题或是文字内容了，然后将文字居中一下。大家可根据自己所需而定，多多灵活运用！

4、最后，我们选择整个表格「右键」-「表格属性」-「边框和底纹」，将边框设为“无”确定。

大家看一下最终效果，利用表格来进行图文排版的处理，比我们直接插入图片和文本框排版更加简单方便！

各位朋友们，你们也试一下吧，点我头像关注我，有不懂的在文章下方的评论区留言问我，我会跟大家一起探讨。本文欢迎转发，转发请注明出处。

有时需要把 Excel 文档、Word 文档和 PDF 文档插入到 Excel 中，应该用 Excel 的什么功能？在 Excel 中，有一项插入对象的功能，用它就可以把它们插入到 Excel 当前文档。另外，Excel 还有插入图片和截图的功能，并且插入的图片可以移到指定的单元格中，还能让图片自适应单元格大小。Excel 还有一项与 Word 一样的插入功能，就是插入符号，应用此功能，可以把打钩与带框的打钩插入到指定单元格。以下插入它们的具体操作方法，操作中所用版本为 Excel 2016。

一、在Excel中插入Excel文档

1、单击要插入Excel文档的单元格选中它，选择“插入”选项卡，单击屏幕右上角“文本”右上角的“对象”图标，打开“对象”窗口，选择“由文件创建”选项卡，单击“浏览”，打开选择文件的“浏览”窗口，定位到要插入 Excel文档所在的文件夹（如 G:\Excel文档），双击要插入的 Excel 文档（如“excel表格的基本操作”），返回“对象”窗口，单击“确定”，则所选文档插入到 Excel 中，操作过程步骤，如图1所示：

2、用这个方法插入Excel只能插入一个工作簿，即只插入当前工作簿，也就是最后一次保存时在操作的工作簿。

二、在Excel中插入PDF

1、在Excel中插入PDF的方法与插入Excel文档一样，也用对象插入。选中要插入PDF的单元格，单击“插入”选项卡下的“对象”图标，打开“对象”窗口，选择“由文件创建”选项卡，如图2所示：

2、单击“浏览”，定位到要插入的 PDF 文件所在文件夹，选择一个 PDF 文件（如 Word技术），如图3所示：

3、单击“插入”返回“对象”窗口，单击“链接到文件”勾选它，如图4所示：

4、单击“确定”，则 PDF 插入到 Excel 中，如图5所示：

提示：该方法一次只能把 PDF 文件的第一页插入到 Excel 中，如果一次要把所有页插入到 Excel 中，可以尝试用复制粘贴的方法，但有一个前提，PDF 中的内容必须能选中复制。

三、在Excel中插入图片到单元格且自适应单元格大小

1、选中要插入图片的单元格（如 A1），先把 A1 单元格调大以便于把图片放到其中；选择“插入”选项卡，单击“图片”，打开“插入图片”窗口，定位到要插入图片所在文件夹，双击要插入的图片，则所选图片插入到 Excel 中，把图片调到跟 A1 单元格差不多大小；右键图片，在弹出的菜单中选择“设置图片格式”，在右边打开“设置图片格式”小窗口，选择“大小与属性”图标，单击“属性”展开，选择“大小和位置随单元格而变”；经此设置后，把单元格缩小或放大时，图片也随之变小变大；操作过程步骤，如图6所示：

2、图片属性除“大小和位置随单元格而变”外，还有“大小固定，位置随单元格而变”和“大小和位置均固定”，可以根据需要选择。

提示：把单元格拉大时，如果单元格大小超过了图片插入时的大小，即使选“大小和位置随单元格而变”，图片也不会再变化。

四、在Excel中截图

（一）截当前窗口

选择“插入”选项卡，单击“屏幕截图”，在弹出的菜单中列出了当前打开的所有窗口，选择要截的窗口，则所选窗口被截到 Excel 中，操作过程步骤，如图7所示：

（二）框选截图

1、单击一下 Windows 任务栏要截图的窗口，然后单击 Windows 任务栏的 Excel 切换到 Excel 窗口，选中用于放图片的单元格（如 A1），选择“插入”选项卡，单击“屏幕截屏”，在弹出的菜单中选择“屏幕剪辑”，如图8所示：

2、切换到要截图的窗口，鼠标随即变为一个十字架，按住鼠标左键并移动以框选要截的部分，如图9所示：

3、框选好后放开鼠标左键，则框部分被插入到 Excel 指定的单元格，把单元格调大，让图片恰好在其中，如图10所示：

五、在Excel中插入打钩与带框的打钩

1、选中要插入打钩的单元格（如 N1），选择“插入”选项卡，单击屏幕右上角的“符号”，打开“符号”窗口，当前为“符号”选项卡；单击“字体”下拉列表框，选择“Wingdings 2”，打钩和带框的打钩在第四行左边，选中打钩，单击“插入”，则打钩插入到单元格 N1 中；选中带框的打钩，再单击“插入”，它也被插入到 N1 中，单击“关闭”把符号窗口关闭，N1 中已经有了打钩和带框的打钩；把光标定位到打钩后，按 Alt + 回车换行，则带框的打钩换到下一行，分别在它们后输入文字；操作过程步骤，如图11所示：

2、在“符号”窗口中，打叉与带框的打叉就在打钩的旁边，要插入它们选择就可以了。

工作表中往往会因为工作需要，在一些特定的单元格里面插入图片。但是当单元格需要进行调整，或者内容移动到其他地方，图片的处理也是需要进行考虑的，是留在原先的单元格，还是一起移动到新单元格里。

如图，单元格B2里面有一张图片，现在需要将B2单元格复制到E2中。

但是图片在单元格里，设置的属性不同，复制的过程中会出现不同的情况。

图片属性介绍

工作表中插入的图片，在图片格式里面都会有一个属性。选中图片→鼠标点右键→选择大小和属性，就会出来设置图片格式。

在设置图片格式中，找到属性一栏，里面有三个选项：

*随单元格改变位置和大小

*随单元格改变位置，但不改变大小

*不随单元格改变位置和大小

下面就来详细介绍一下这三个选项的作用，以及如何在复制或者移动单元格的时候，让图片能够根据我们的需要来移动。

随单元格改变位置和大小

当图片属性为这个选项时，如果单元格的行高和列宽变化了，图片的大小也会跟随着变化，图片边缘不会超过所在的单元格。如图所示：

另一种情况是，当这个单元格要复制到另一个单元格里，图片也会跟着复制过去。如果新单元格的行高和列宽比较大，图片会保持原来的大小；如果新单元格的行高和列宽比较小的话，图片也会进行缩小。

因此，选择这个随单元格改变位置和大小属性，不论单元格进行什么操作，图片都会乖乖呆在单元格里了。

随单元格改变位置，但不改变大小

这个属性也是工作表里新插入图片时的默认属性。这时如果改变单元格的行高或者列宽，图片的大小是不会改变的。

如果复制单元格，图片也是会跟着复制到新单元格里的，但是不管新单元格的大小如何，图片本身的大小不会改变。

不随单元格改变位置和大小

理解了前面两条属性以后，这一条的功能也就不难理解了。如果图片设置了这条属性，那么不管单元格是大小进行调整，还是复制到新单元格，这张图片都只会留在原来的位置，大小保持不变。

以上就是关于工作表中图片的三个属性，在实际应用当中，可以根据需要来进行属性的设置，以方便工作进行。

　　1、例如，在下面的表格中，我们要在照片栏中插入每个员工的照片。

　　2、单击选中要插入图片的单元格，如图中单元格E3。

　　3、依次点击菜单“插入”——“图片”——“来自文件”。

　　4、在“插入图片”窗口，选择要插入的图片，点击“插入”按钮插入图片。

　　5、在excel表格中，拖动图片控制点，调整图片大小以与单元格边框对齐。

　　6、在图片上双击鼠标，打开“设置图片格式”窗口，在“属性”页面，选择“大小，位置随单元格而变”。

　　7、设置好后，调整单元格大小，照片随之调整。

　　8、其它单元格要插入图片：如何是excel2003，则必须重复以上步骤进行插入。

　　而如果是EXCEL2007，2010的话，可以先复制设置好的图片，然后进行粘贴，全部复制好后，在图片上右键鼠标，弹出菜单中选择“更改图片”，然后把图片更改成需要的图片就可以了。

（本文内容由百度知道网友yjtkgg321贡献）

前几天跟大家分享的Excel表格如何添加漂亮的背景图片，就有同学问我如何给单个单元格添加背景。

今天就跟大家分享Excel如何给单个单元格添加背景图片。

1、在【插入】功能选项中的“文本”菜单中选择插入一个横排文本框；

插入文本框

2、插入文本框后，在文本框中右键点击选择“设置形状格式”；

3、通过设置图片格式，填充项选择“图片或纹理填充”，插入图片来自“文件”选择自己需要的图片；

插入图片

4、图片插入完成后，在设置图片格式文本选项处，不要勾选“根据文字调整形状大小”前面的框；

设置图片格式的文本选项

5、在Excel单元格中插入图片后便可在图片中输入你要的文字内容，根据自己的需求来调整“文本选项”里面的文本框设置，字体的设计也可到【开始】功能选项下方的字体菜单中设置；

输入文字内容

6、根据自己的需要来设置图片格式中的形状选项，下图是将三位格式中的顶部棱台设置为“冷色斜面”格式；

设置自己需要的效果

7、Excel单个单元格中的背景图片添加完成效果呈现。

设置完成效果呈现

Excel单个单元格中背景图片的添加，很多时候我们会将这个小技巧用在Excel表格中的按钮设置，可能朋友们在工作中用到的不多，希望这个小技巧分享对需要的朋友有所帮助！

更多关于Office——Excel操作技巧可与我们一起交流！