求助：VFP的PRG中用什么语句可以执行EXCEL中宏 - VFP论坛

编程论坛 → 数据库技术 → 『 VFP论坛』 → 求助：VFP的PRG中用什么语句可以执行EXCEL中宏

标题：求助：VFP的PRG中用什么语句可以执行EXCEL中宏

取消只看楼主

xs591222

等　级：贵宾
威　望：28
帖　子：680
专家分：1287
注　册：2009-3-1
结帖率：100%

楼主

已结贴√ 问题点数：66 回复次数：3

求助：VFP的PRG中用什么语句可以执行EXCEL中宏

我的问题是这样的：
1、先在EXCEL中制作好工资表的模板，模板中有生成员工工资条的宏；
2、用VFP算好员工（有1000余人）的工资，生成下属（有上百家）单位的EXCEL工资表；
3、执行PRG时，生成一家，复制粘贴到模板表上，另存为……。
4、发送给相应的下属单位。

现在问题是：想要在粘贴到模板表后，另存为……之前，执行一下模板表上的宏，以生成员工工资条，再另存为……。这个PRG文档中要添加的语句不会写了，特来此处求教。请各位大能　赐教！谢谢！

搜索更多相关主题的帖子: PRG　宏　 EXCEL　模板　工资　

2021-10-17 09:38

xs591222

等　级：贵宾
威　望：28
帖　子：680
专家分：1287
注　册：2009-3-1

第 2 楼

得分:0

以下是引用sdta在2021-10-17 11:07:22的发言：

楼上说的非常正确，上百家单位，用ＶＦＰ导出到ＥＸＣＥＬ中也就几分钟吧（估计，最好上传相关数据方便测试）

企业数据都是加密的，上传了是一片乱码

2021-10-19 21:18

xs591222

等　级：贵宾
威　望：28
帖　子：680
专家分：1287
注　册：2009-3-1

第 3 楼

得分: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

等　级：贵宾
威　望：28
帖　子：680
专家分：1287
注　册：2009-3-1

第 4 楼

得分: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

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