Макрос VBA для загрузки в дополнение EPM

Я работаю над автоматизацией загрузки данных через надстройку планирования спроса 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

Но проблема в том, что мне нужно нажать "Да" на каждом листе рабочей книги после начала загрузки.

Есть ли способ автоматически нажимать кнопку ОК каждый раз или загружать всю книгу сразу.

Источник

1 ответ

Попробуй это:

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

Все формы ввода в вашей рабочей книге будут отправлены только с одним подтверждающим сообщением.

Источник
Другие вопросы по тегам