在EXCEL中怎么用宏插入图片?

 我来答
诸事可言
高粉答主

2019-06-19 · 兢兢业业的社会风向的观察者
诸事可言
采纳数:30 获赞数:28096

向TA提问 私信TA
展开全部

材料/工具:电脑、Excel2007

1、首先,打开Excel表格,点击表格最左上边office按钮---excel选项 。

2、弹出来一个对话框,点击”常用“栏目,右侧出现常用对话框,我们找到一个叫做“在功能区显示开发者选项卡”,点击勾选它。点击确定。

3、回到打开表格的开始页面,将表格中图片那一列填充对应的款号或编码,注意要插入图片的表格里边在插入图片之前是有编号的,里边的编号就是对应的款号。如图所示点击”Visual Basic快捷键是”ALT+F11 “。

4、然后点击 ”文件“,选择”导入文件“。

5、导入后文件后,窗口上方有一排”宏“的指令,点那个绿色的三角运行"宏" 三角按钮就是经常用到的”开始/播放“那个按钮点,然后跳出一个对话框,点击”运行“。

6、我们要导入图片的位置,就是把图片存在我们电脑上的哪个位置复制下来填进方框里边去,复制  粘贴就可以了。也可以手动输入进去,但是完成后,一定记得再加一个“\”点确定。

7、点击确定,对话框关闭。我们就回到开始页面了,这时发现我们已经将图片导入表中对应的款式去了。

清风吧吧啦
推荐于2017-09-16 · TA获得超过5936个赞
知道大有可为答主
回答量:3426
采纳率:68%
帮助的人:748万
展开全部

这个需要和excel工作表事件进行配合才可完成,以下面模拟为例

在职工信息中表中为员工插入图片,当单击职工姓名时,就会出现职工的照片,需要做的前期准备就是,必须要将职工信息表和职工照片放在同一文件夹下。

在信息表中插入以下代码:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

On Error Resume Next

If Target.Column = 2 Then

    Me.Image1.Visible = True

    Image1.Picture = LoadPicture(ThisWorkbook.Path & "\员工照片\" & Target.Offset(0, -1) & ".jpg")

    Image1.Left = Target.Left + Target.Width

    Image1.Top = Target.Top

Else

    Me.Image1.Visible = False

End If

c = Target.Value

End Sub


已赞过 已踩过<
你对这个回答的评价是?
评论 收起
2724421
2012-03-22 · TA获得超过2493个赞
知道大有可为答主
回答量:1551
采纳率:71%
帮助的人:948万
展开全部
sub test
dim sfilename as string
sfilename="d:\PIC\1.jpg"
range("A2").select
ActiveSheet.Shapes.AddPicture sfileName, True, True, .Left, .Top, .Width * 6, .Height
end sub
追问
谢谢。这个我会,主要是要一次插入很多的图片,不同的
追答
那你根据这个写个循环不就可以了
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(1)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

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

类别

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

说明

0/200

提交
取消

辅 助

模 式