| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1322 人关注过本帖
标题:请问表单上面grid中的图片如何导出到Excel?
只看楼主 加入收藏
yafengliang
Rank: 2
等 级:论坛游民
帖 子:111
专家分:35
注 册:2016-2-21
结帖率:54.55%
收藏
已结贴  问题点数:20 回复次数:2 
请问表单上面grid中的图片如何导出到Excel?
图片已经下载到本地磁盘。
搜索更多相关主题的帖子: 图片 Excel 导出 grid 表单 
2020-02-17 00:20
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:451
帖 子:10607
专家分:43186
注 册:2014-5-20
收藏
得分:20 
具体情况不清楚,图片在哪取、放到EXCEL哪里?
给GRID的代码和要生成的EXCEL文件看看
2020-02-17 05:59
yafengliang
Rank: 2
等 级:论坛游民
帖 子:111
专家分:35
注 册:2016-2-21
收藏
得分:0 
已解决,参考sdta,感谢。
下面引用自sdta:
oExcel=CreateObject('Excel.Application')
With oExcel
    .Workbooks.Add
    .SheetsInNewWorkBook=1
    .Sheets(1).Cells(2,5).Select
    .ActiveSheet.Pictures.Insert("F:\第五十组MIS设计报告\1-110Q0130GD10.jpg").Select
    .Selection.ShapeRange.LockAspectRatio =.T.
    .ActiveSheet.Columns(5).ColumnWidth=500/6.06 && 像素宽度与6.06的比值为列宽,同理可以设置行高
    .ActiveWorkBook.SaveAs("D:\群问题\Aa.Xls")
*    .Visible=.T.
    .Quit
EndWith
RELEASE oExcel
2020-02-18 00:10
快速回复:请问表单上面grid中的图片如何导出到Excel?
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.023263 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved