作者:乔山办公网日期:
返回目录:excel表格制作
1、打开excel表格,在插入中点击“zd图片”,按住“Ctrl”键选择三张图片,点击插入。
2、即可同时插入多张图片,下图为插入图片后的效果,三张图片大小不一。
3、按住“Ctrl”后点击鼠标左键选择图片,可以同时选中三张图片。
4、点击鼠标右键,选择“大专小和属性”。
5、在右侧弹出的项目中,将“锁定纵横比”的勾选框去除。
6、然后在“高度和宽度”分别输入需要的图属片大小数值。
7、即可将选中的图片更改为设置的高度和宽度了。
方法/步骤
在此小编举例说明,因此Excel表格记录相对较少,知如图所示,我们需要将对应照片插入“照片”列。
首先,我们需要将照片放置一个文件夹内,建议对照片进行有规则的命名,这样可以方便快捷创建多个图片链道接。
打开记事本程序,按如下格式输入图片的链接:
<table><img src="d:\pic\*.jpg" width="140" height="140">
将记事本中的文本全选进行复制,在Excel工作表中,右击“照片”列第一行,从弹出的右键内菜单中选择“选择性粘贴”项容。
在弹出的“选择性粘贴”窗口中,选中“Unicode文本”项,直接点击“确定”按钮。
最后就会发现相关的照片自动插入到“照片”所在单元格啦。
插入1个文本框,调整成单元格格式一样的大小,然后在该文本框内填充你需要的照片。
再复制这个文本框,重新填充新的图片。
用VB代码解zd决,代码如下:
Sub 批量导入相片()
Dim i, myPath$
myPath = ThisWorkbook.Path & "\" '获取当前文件的回路径
For i = 2 To 11
Range("C" & i).Select
ActiveSheet.Pictures.Insert(myPath & Range("A" & i) & ".jpg").Select
'在选中的位置答插入图片
'myPath 相位的路径
'Range("A" & i) 相片的文件名,如果相片用B列的姓名命名也可以的
'要有相片路径+名称+后缀
Next i
End Sub