vb.net借助剪贴板将图片导入excel内
Dim im as Image=Image.FromFile ("C:/picture.bmp") '获得Image
System.Windows.Forms.Clipboard.SetDataObject(im, True) '复制到剪贴板
Dim xlApp As Excel.Application = New Excel.Application()
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.Worksheet
xlBook = xlApp.Workbooks().Add
xlSheet = xlBook.Worksheets("sheet1")
Dim range As Excel.Range = xlSheet.Range(xlApp.Cells(4, 1), xlApp.Cells(4, 1)) '粘贴图片的位置
xlSheet.Paste(range, im) '将图片插入Excel
您可能感兴趣的文章
- 01-10用vbs 实现从剪贴板中抓取一个 URL 然后在浏览器中打开该 Web 站
- 01-10用vbscript实现将脚本的输出复制到剪贴板
- 01-10VB.net常用字符和日期等函数
- 01-10vb.net发布水晶报表程序步骤
- 01-10vb.net验证密码是否复杂的方法
- 01-10vb.net读写文件代码
- 01-10VBScript 剪贴板抓取URL并在浏览器中打开
- 01-10VB.net 查询获取数据库数据信息
- 01-10VBS访问剪贴板的几种方法小结
- 01-10VB.NET验证邮件地址的合法性实现代码