急!!excel在单元格中插入图片,图片大小自动与单元格一致

需要把文件夹中的图片根据名称插入到相对应名称的excel单元格中,一行对应一张图片。如果插入的图片一张张调整大小,很麻烦。求一种方法,把插入的图片自动调整到单元格大小~~... 需要把文件夹中的图片根据名称插入到相对应名称的excel单元格中,一行对应一张图片。如果插入的图片一张张调整大小,很麻烦。求一种方法,把插入的图片自动调整到单元格大小~~非常感谢 展开
 我来答
百度网友42dcf0520
2010-08-10
知道答主
回答量:5
采纳率:0%
帮助的人:0
展开全部

双击图片 会有个设置图片格式的对话框弹出来

属性里面 如图

大小固定 还是位置固定 还是都不变 你自己选就好了咯

柔软的Bp
科技发烧友

2010-08-06 · 智能家居/数码/手机/智能家电产品都懂点
知道大有可为答主
回答量:3万
采纳率:67%
帮助的人:8700万
展开全部
插入图片后,右键图片--属性--勾选“大小随单元格变化”
列 :EXCEL表格,A列是产品图片,B列是货号,能否在B列输入货号(如123)的同时把放在E:\tmp目录下的相应货号的JPG图片调出来,且大小与A列单元格完全相符。
用vba,按下ALT+F11,菜单:插入-模块,复制下面代码至代码框.按F5即可
Sub addpicture()

Dim FirstRow, LastRow As Integer, FileType As String
FirstRow = Sheet1.UsedRange.Row
LastRow = FirstRow + Sheet1.UsedRange.Rows.Count - 1
FileType = InputBox("输入你的图片的后缀名", "输入图片格式", "jpg")
For i = FirstRow To LastRow
Numb = Cells(i, 2).Value
With ActiveSheet
.Pictures.Insert("D:\tmp\" & Numb & "." & FileType).Select
Set Target = .Cells(i, 1)
End With
With Selection
.Top = Target.Top + 1
.Left = Target.Left + 1
.Width = Target.Width - 1
.Height = Target.Height - 1
End With
Next i
End Sub

说明,图片文件夹 图片文件名与输入货号一致。
本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式