VB如何实现,读取本地的一张图片,然后把这张图片贴到一个EXCEL里,求解
VB如何实现,读取本地的一张图片,然后把这张图片贴到一个EXCEL里,求高手解答。
[解决办法]
要添加对EXCEL的引用
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim EXCELApp As Excel.Application
EXCELApp = New Excel.Application()
EXCELApp.Visible = True
EXCELApp.Workbooks.Add()
EXCELApp.Range("E2").Select()
EXCELApp.ActiveWorkbook.ActiveSheet.Pictures.Insert( _
"C:\Documents and Settings\Administrator\My Documents\My Pictures\汶川.jpg"). _
Select()
End Sub
End Class