返回首页
当前位置: 主页 > Excel教程 > Excel2016教程 >

利用Excel做索引目录表实现图解教程(2)

时间:2017-10-09 23:26来源:Office教程学习网 www.office68.com编辑:麦田守望者

如果是对图片文件的管理,我们还可通过建立批注预览超链接图片,这样在Excel就可以非常方便实现对图片的预览和查找。操作同上,先获得图片文件目录并在Excel中建立超链接(图7)。

201708epml07

图7 建立图片超链接

由于在Excel中插入批注,当批注被填充为图片后鼠标悬停即可显示预览图。因此接下来只要将批注填充到A列中对应单元格,并将填充图片对应为A列显示图片即可。批注批量添加可以通过宏来完成。

按下Alt+F11打开VB编辑窗口,点击“插入→模块”,然后在代码框里输入下列的代码(图8):

201708epml08

Sub AddABunch()

For Each cell In Selection

Pics = "I:\090527\" & cell.Value & ".jpg"

With cell.AddComment

If Dir(Pics) = "" Then

Else

.Shape.Fill.UserPicture PictureFile:=Pics

.Shape.Height = 300

.Shape.Width = 200

End If

End With

Next cell

End Sub

小提示:

上述代码的意思是在需要插入批注的单元格,通过引用单元格名称的图片来作为批注。因此插入批注单元格名称一定要和指定图片目录里的图片文件一致,上述A列使用dir命令获取文件列表,Pics = "I:\090527\"是获取图片目录,预览图片大小是300*200.

返回Excel文本窗口,选中A列需要插入批注的单元格,点击“视图→宏→查看宏”,在打开的窗口选择“Sheet1.AddABunch”宏,点击“执行”(图9)。

201708epml09

图9 运行宏

这样A列所有单元格会插入图片批注宏,当鼠标停留在A列对应单元格的时候就会显示预览图片,这个图片来自获取目录里对应的图片,如果预览满意后要打开相应的图片,直接点击相应的超链接即可。这样即使很多图片,我们也可以在一个工作表中进行管理(图10)。

201708epml10

图10 使用批注预览图片

------分隔线----------------------------
标签(Tag):excel excel2016 Excel索引目录表
------分隔线----------------------------
推荐内容
猜你感兴趣