在 EPM 插件中上传的 VBA 宏

Question

我正在通过 EPM 需求计划插件自动上传数据。

我有 33 张；每张表都有一组要上传的数据，总共有1000多个数据点。目前，我必须单独转到每张工作表并单击上传按钮，这是高度手动且耗时的。

我已经编写了一个宏来上传整个工作簿，但是在上传之间，Excel 崩溃了。所以我正在寻找一种方法来一张一张地上传每张纸。

宏代码：-

Sub Upload()
Dim ws As Worksheet, flg As Boolean
For Each ws In Sheets
ws.Select
EPMexample.SaveAndRefreshWorksheetData
Next
End Sub

但挑战是，一旦开始上传，我必须为工作簿中的每个工作表单击“是”。

有没有办法每次都自动点击确定或者一次上传整个工作簿。

Answer 1

试试这个：

Sub Upload()
    EPMexample.SaveWorkbookData
    EPMexample.RefreshActiveWorkBook
End Sub

您的工作簿中的所有输入表单都将被提交，只有一条确认消息。