1、让你的图片招之即来在 Excel 中可以通过改变单元格的值来动态显示图片。当我们用 Excel 中进行人事信息管理时，这一点显得很有用。例如在使用 Excel 管理员工信息时，不仅可以在表格中显示人员的各种文字资料信息，还可以像纸质资料一样，显示其照片或相关图片。并且，可以让每个人的文字和图片信息与姓名单元格相关联，通过改变该单元格中人员姓名来显示不同人员的各种信息。本文将通过一个具体的实例，来说明如何将图片和单元格进行关联，当改变单元格内容时，显示对应的图片。文章最后附有 xls 格式的示例文件供下载。大家知道，现在太阳系只有八大行星，我们就用八大行星的文字和图片资料为例来进行说明。在下图（
2、图一）这个示例中，可以通过单击 A5 单元格右侧的下拉箭头来选择一个行星名称，Excel 将动态地显示该行星的图片和文字资料。文字内容的关联方法可以用VLOOKUP 函数来实现，本文不作赘述。一、准备图片和文字资料在 Excel 中新建 3 个工作表，分别命名为 “图片”、“资料 ”和“表格”。“图片”工作表用于存放图片，“资料” 工作表用于存放文字资料，“ 表格”工作表用于动态显示文字和图片。在 Excel 2003 中，单击菜单 “插入图片来自文件”，将各行星图片导入到 Excel 的“图片”工作表中。在 Excel 2007 中，在功能区中选择“插入”选项卡，单击 “插入”按钮导入图片。
3、然后按照顺序将名称和图片分别放到 A2:A9 区域和 B2:B9 区域中，调整图片到合适的大小，使每个图片占一个单元格。A1 和 B1 单元格为标题。文字资料放到“资料” 工作表中。二、设计表格在“表格”工作表中设计好要显示资料和图片的表格，如图一。A5 单元格用于存放行星名称，在后面的步骤中用数据有效性来提供一个下拉列表以便选择。将 I3:I8 单元格合并，并调整为与行星图片相同的大小，准备放置动态图片。三、定义名称Excel 2003：单击菜单“插入名称定义”，在弹出的“定义名称”对话框中，在“当前工作簿中的名称”下方的文本框中输入一个名称“list”，在“引用位置”下方的文本框中输入公式
4、：=OFFSET(图片!$A$1,1,0,COUNTA(图片!$A:$A)-1,1)说明：该公式定义了一个动态区域，准备用数据有效性来产生一个包含行星名称的下拉列表。先用 COUNTA 函数统计“图片”工作表中 A 列中不为空的文本的数量，减去 “1”是因为有标题行，然后用 OFFSET 函数返回 A2:A9 区域的引用。当以后又新的内容添加到A2:A9 区域下面的单元格中时，该公式可以返回 A 列中动态区域的引用。单击“添加”按钮。再次在“当前工作簿中的名称”下方的文本框中输入另一个名称“pic” ，在“引用位置”下方的文本框中输入公式：=OFFSET(图片!$B$2,MATCH(表格!$A
5、$5,list,0)-1,0,1,1)说明：该公式先用 MATCH 函数返回“表格”工作表中 A5 单元格在“list” 名称列表中的位置，然后用 OFFSET 函数返回“图片”表格中 B 列中的对应的图片。该公式将关联到动态图片中。单击“确定”按钮关闭对话框。Excel 2007：在功能区中选择 “公式”选项卡，然后在“定义的名称 ”组中单击“定义名称”按钮，分别定义两个名称“list”和“pic” 。四、制作下拉列表在“表格”工作表中，选择 A5 单元格，单击菜单“数据有效性”。如果是 Excel 2007，则在功能区中选择“数据” 选项卡，在“ 数据工具”组中单击“数据有效性”按钮。在弹
6、出的“数据有效性”对话框中，选择“ 设置” 选项卡，在“允许”下方的下拉列表中选择“序列”，在“来源”下方的文本框中输入公式：=list单击“确定”。这时在 A5 单元格的右侧会出现一个下拉箭头，单击可以在下拉列表中选择不同的行星名称。五、关联动态图片Excel 2003：选择“表格”工作表中合并了的 I3 单元格，按住 Shift 键，单击菜单“编辑复制图片”，在弹出的“复制图片”对话框中选择“如屏幕所示”和“图片”，单击“确定”。保持选择 I3 单元格，单击菜单“编辑粘贴”，Excel 将粘贴一个与 I3 单元格同样大小的图片到 I3 单元格的位置。选择该图片，在编辑栏中输入公式：=pic
7、回车后将显示某个行星图片。保存工作簿，这时通过单击 A5 单元格中的下拉列表选择不同的行星名称，会显示相应的行星图片。Excel 2007：选择“表格”工作表中合并后的 I3 单元格，在功能区中选择“插入”选项卡，在“文本”组中单击“ 对象”按钮，在弹出的“对象”窗口中选择 “位图图像”，单击“确定”。这时，弹出“画图” 程序的界面。按 ESC 键或在工作表中单击回到 Excel 中，选择插入的图片对象，可以看到编辑栏中有一个公式：=EMBED(“Paint.Picture“,“)将该公式改为：=pic回车后将显示某个行星图片。这时通过单击 A5 单元格中的下拉列表选择不同的行星名称，会显示相应的行星图片。范例文件
