height="15">
为什么会产生这样的效果呢，我们知道Excel可以保存为网页文件，而网页文件也可以转换为Excel文件，说明Excel是支持网页代码的，但是Excel支持的网
友代码有限，并不是全部支持。
即使是这样也能利用这一点为我们解决不少看似解决不了的问题，如批量更改单元格部分文字格式，批量建立或更改超链接，批量更改批注文字，输入带圈字符等等。看来Excel还有不少有待我们开发的宝藏
我有a列五十一个学生的姓名，有51个学生的相片，分别按顺序命名：1，2，3，……
我希望在b列每个学生姓名旁边导入相片，如果一张张插入就要等过年，哪位高手可以帮我
函数和公式我就不知道了，如果用宏代码如下，假设你的照片存在
D:Picturesstudents下，照片名字就是1到52，照片格式是jpg格式
Dim cun As Integer
For cun = 1 To 52
Range("b" & cun).Select
( _
"D:Picturesstudents" & cun & ".jpg" _
).Select
Next cun
End Sub
2008-7-6 13:50
回复
4楼
编程的方法比较简
老鼠麦大米
2位粉丝
单,推荐使用。
另外仅操作也是能够实现的批量插入图片到单元格。
1.首先设置一下,B
列单元格的行高列宽,使其大小比列正常可以放置照片;
2.视图-常用工具栏-勾选绘图。在绘图工具栏选择绘图菜单,自动对齐,勾选对齐到网格.
3.选择B列需要插入的图片的第一个单元格,例如B2，
插入-图片-来自文件,按着Ctrl和Shift来选择52张图片,确定
+G,定位条件,对象,确定
5.绘图工具栏-绘图菜单,对齐或分布,左对齐
+1,大小,去掉锁定纵横比的对勾,
设置宽度和高度(大小可以随意写,统一即可)
7.调整图片高度宽度,让其和B列单元格重合,
（由于勾选了对齐到网格,对齐比较容易）
EXCEL是一个名单,里面有大约600多人,照片在另一个文件夹里,用人名命名的.如何批量导入一一对应到名单中的每一个人,高手回答,如果可行将奖励400分!谢谢
提问者： hue8238 - 三级
最佳答案
这是单个人名设置的宏，如果要设置多个人的话，必须要看你的表格的格式是怎么样的。你可以加我QQ，81565434，我帮你做出来，但要注明是百度问题。其它闲杂人等勿扰。。
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
("C:temp" & & ".jpg").Select 'Insert
Pictures"
("C:temp" & & ".jpeg").Select 'Insert
Pictures"
("C:temp" & & ".gif").Select 'Insert
Pictures"
("C:temp" & & ".jpe").Select 'Insert
Pictures"
("C:temp" & & ".BMP").Select 'Insert
Pictures"
("C:temp" & & ".BMP").Select 'Insert
Pictures"
("C:temp" & & ".BMP").Select 'Insert
Pictures"
("C:temp" & & ".BMP").Select 'Insert
Pictures"
= 'Picture name
pectRatio = msoFalse '
= 'H
= 'W
= 'Top
= 'Left
End Sub
本文发布于:2024-01-23，感谢您对本站的认可！
版权声明:本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系，我们将在24小时内删除。
发布评论