标题:VFP如何在Excel单元格中插入一张图片?感谢!
只看楼主
yqyang
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2009-7-11
结帖率:100%
已结贴  问题点数:10 回复次数:13 
VFP如何在Excel单元格中插入一张图片?感谢!
公司组织员工考试,要批量生成准考证,我想用VFP将员工相关信息写入准考证模板(Excel表)。员工相关文字信息写入模板已没问题,就是不知道员工照片用VFP如何插入到准考证的相应单元格中,网上搜了半天也没查到方法。请谁知道麻烦告诉我一下,非常感谢!!
搜索更多相关主题的帖子: 单元格 员工 Excel VFP 插入 
2022-10-20 21:08
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:323
帖 子:9621
专家分:26174
注 册:2012-2-5
得分:1 
论坛中有这方面的内容,自己搜索吧

坚守VFP最后的阵地
2022-10-20 21:25
schtg
Rank: 11Rank: 11Rank: 11Rank: 11
来 自:https://t.me/pump_upp
等 级:贵宾
威 望:67
帖 子:1355
专家分:2534
注 册:2012-2-29
得分:1 
回复 楼主 yqyang
也可以写入word模版吧
2022-10-21 06:08
laowan001
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:54
帖 子:802
专家分:1914
注 册:2015-12-30
得分:1 
可以考虑用VFP将准考证打印到PDF文件
2022-10-21 08:33
wengjl
Rank: 14Rank: 14Rank: 14Rank: 14
等 级:贵宾
威 望:108
帖 子:2175
专家分:3785
注 册:2007-4-27
得分:0 
以下是引用laowan001在2022-10-21 08:33:49的发言:

可以考虑用VFP将准考证打印到PDF文件


我想将VFP的报表输出到PDF,要能自动命名PDF文档的名称,试过N次都没成功。

能不能详细介绍一下!例如:我算好工资后,按部门 打印报表,想要以部门的名称,自动命名生成的PDF文档名。

只求每天有一丁点儿的进步就可以了
2022-10-21 10:44
laowan001
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:54
帖 子:802
专家分:1914
注 册:2015-12-30
得分:0 
以下是引用wengjl在2022-10-21 10:44:25的发言:



我想将VFP的报表输出到PDF,要能自动命名PDF文档的名称,试过N次都没成功。

能不能详细介绍一下!例如:我算好工资后,按部门 打印报表,想要以部门的名称,自动命名生成的PDF文档名。


(1)缺省打印机设置为:Microsoft Print to PDF
(2)在REPORT FORM 语句之前加下面这两句
xfilename = '输出文件名'+CHR(13)    && 注意:想要自动打印,输入文件名就不要重复(你那里应该是部门名称之类的),否则会有提示框弹出
KEYBOARD xfilename

我试过,这样可以的
2022-10-21 11:06
cjc1010
Rank: 3Rank: 3
等 级:论坛游侠
威 望:4
帖 子:64
专家分:195
注 册:2006-4-16
得分:7 
**以下是在I2单元格中放置图片
   SELECT xxhzb  
   oxls.range("I2").select    &&&图片放置位置
   oxls.ActiveSheet.pictures.insert(SYS(5)+SYS(2003)+"\pic\"+ALLTRIM(bh)+".bmp").select
   *oxls.ActiveSheet.pictures.insert(".\pic\"+ALLTRIM(bh)+".bmp").select   &&需要选中图片才能调整高度
   oxls.Selection.shaperange.height=120   &&&图片高度
**
2022-10-21 11:24
fyyylyl
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:16
帖 子:287
专家分:676
注 册:2006-5-22
得分:0 
以下是引用laowan001在2022-10-21 11:06:56的发言:



(1)缺省打印机设置为:Microsoft Print to PDF
(2)在REPORT FORM 语句之前加下面这两句
xfilename = '输出文件名'+CHR(13)    && 注意:想要自动打印,输入文件名就不要重复(你那里应该是部门名称之类的),否则会有提示框弹出
KEYBOARD xfilename

我试过,这样可以的

也可以先生成WORD文档,然后利用其导出为PDF文档的功能则不受打印机安装的影响,可以用纯代码生成PDF文档

2022-10-21 11:46
laowan001
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:54
帖 子:802
专家分:1914
注 册:2015-12-30
得分:0 
以下是引用fyyylyl在2022-10-21 11:46:53的发言:


也可以先生成WORD文档,然后利用其导出为PDF文档的功能则不受打印机安装的影响,可以用纯代码生成PDF文档

这样是可以,但还是要人工干预,特别是输出多个PDF的时候就更麻烦了,没法实现自动+全部
2022-10-21 15:49
fyyylyl
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:16
帖 子:287
专家分:676
注 册:2006-5-22
得分:0 
以下是引用laowan001在2022-10-21 15:49:57的发言:


这样是可以,但还是要人工干预,特别是输出多个PDF的时候就更麻烦了,没法实现自动+全部

不需要的啊!和生成报表一样的,只不过生成WORD文档时代码不如报表简单,生成后另存即可:.ActiveDocument.SaveAs(cFileName,nFileFormat)

2022-10-21 16:03



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-510393-1-1.html




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

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