| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1898 人关注过本帖
标题:求助:VFP的PRG中用什么语句可以执行EXCEL中宏
只看楼主 加入收藏
xs591222
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:28
帖 子:680
专家分:1287
注 册:2009-3-1
收藏
得分:0 
以下是引用laowan001在2021-10-18 16:17:42的发言:

估计EXCEL模板早就有了,早先是直接在EXCEL表里做工资,后来做了VFP程序管理工资的基础数据,导出到EXCEL里然后运行宏来完成计算工作,算是进了一步。如果是这样,其实还可以再进一步,由VFP直接完成工资的计算工作


百余个EXCEL工资表是用VFP生成的。如果生成工资条,对每个E表打开执行一下宏,那就太麻烦了。

当然了,工资条也可以用VFP来生成,感觉代码有点难。而宏是以前就存在的,所以想在VFP的PRG中加个语句,调用VBA的宏。以为可以省力一点。
2021-10-19 21:23
xs591222
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:28
帖 子:680
专家分:1287
注 册:2009-3-1
收藏
得分:0 
以下是引用厨师王德榜在2021-10-18 14:15:07的发言:

参考如下代码:
* 注意:此方法成功的关键是用户必须允许EXCEL宏的运行。并且允许对VBA工程对象的访问。
* 假定EXCEL文档中已经有了一个叫做Sub ArrayFill()的宏.


    myexcel = CREATEOBJECT("Excel.Application")
    myexcel.DisplayAlerts = .F.  &&  不弹出警告框   
    wb = myexcel.Workbooks.open(cExlFullPath)
   

* 请确认勾选了: 可靠发行商中的 “信任对 Visual Basic 项目”的访问
myexcel.Run('ArrayFill', @arrEsj)  && @arrEsj是这个宏的参数.
        myexcel.save()   
        myexcel.quit()
        RELEASE myexcel

感谢王大厨,我抽时间测试来着。谢谢!
2021-10-19 21:25
laowan001
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:66
帖 子:1063
专家分:2579
注 册:2015-12-30
收藏
得分:0 
回复 11楼 xs591222
方便的话,可以放出一些EXCEL的宏,大家帮你看看是否麻烦
2021-10-20 07:49
快速回复:求助:VFP的PRG中用什么语句可以执行EXCEL中宏
数据加载中...
 
   



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

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