向excel中插入图片

[kevinnick]

在Excel中合并一块单元格（比如E到H列，3到6行），并在上面做一个按钮，点按纽后可以选择电脑里的图片插入到合并的单元格，并自动调整图片大小到单元格内。

如上功能需要怎么做？
以前看到别人做了这么一个功能，但是现在找不到那人了。请高手们帮帮忙！！！

[laoyebin]

这个插入图片动作录个宏就可以了，自己可以试试，不行的话我再给你代码

[kevinnick]

[Quote=引用 1 楼 laoyebin 的回复:]

这个插入图片动作录个宏就可以了，自己可以试试，不行的话我再给你代码
[/Quote]

呵呵，大哥，这个宏我没有玩过，帮我传份源代码哦！越完整越好，最好加点注解！
[e-mail]

谢了！！

[sanctimonious]

录制了宏之后看一下代码

[furyedge]

学习了.............

[kevinnick]

还没有发啊!?
高手们,帮我看看这个要怎么解决

[laoyebin]

呃，忘记了
今天培训，晚上写一个给你

[laoyebin]

Sub test()
    Sheet1.Pictures.Insert(ThisWorkbook.Path & "\1.jpg").Select
    With Selection
        .Top = [e3].Top
        .Left = [e3].Left
        .Width = [e3:h6].Width
        .Height = [e3:h6].Height
    End With
End Sub

[kevinnick]

.................?

[fanwujun]

二楼是正解，谢谢。