сделать чтобы каждая книга открывалась на 5мин (примерно столько времени идет обмен данными между книгами) и закрывалась ?

[роман-талица]

Например я открываю Microsoft Office Excel 1 книгу а она передает данные в другие 100 книг и получает из них данные . И мне приходится вручную их открывать и закрывать .
Как сделать чтобы каждая книга открывалась на 5мин (примерно столько времени идет обмен данными между книгами) и закрывалась ? ? ?
И желательно чтобы после закрытия следующая открылась через 1мин (а то закрытие проходит почему то секунд 20 примерно .
То есть можно ли создать такую кнопку в первой основной книге ???

[kalbasiatka]

Сообщение от роман-талица

Как сделать чтобы каждая книга открывалась на 5мин (примерно столько времени идет обмен данными между книгами) и закрывалась ? ? ?

А если обмен займёт больше времени?

Сообщение от роман-талица

можно ли создать такую кнопку

Можно!
Может написать макрос, а не кнопку.

[vefer]

А зачем временные рамки открытия и закрытия? Можно сделать, чтобы они открывались и закрывались по окончании действия. И что у вас за данные такие объемные?

[Hugo121]

Цикл по списку файлов - каждый открываем, обновляем связи, закрываем с сохранением. Это нужно?

[IgorGO]

согласен, временные рамки - тут ни к чему, нужен список файлов, или маска их имен, или папка, в которой лежат только необходимые для обработки файлы.

[роман-талица]

Извините отвлекся баню достраиваю

1) я засекал больше 5 мин не надо , где то секунд 30 идет полоса загрузки потом сразу начинается подсчет формул примерно 2мин , и потом секунд 10 начинает отображаться все формулы .

2) Можно и макрос если такой можно сделать .

3) Можно и без временных рамок , т.е. по окончании действия если ошибок в подсчете не будет . 95% объема одна и та же формула но у каждой абсолютно всегда меняется значение.

4) закрывать все можно без сохранения кроме первой основной в которой все ответы .

5) Если честно я чайник в программировании но стараюсь внимательно читать ответы

[Hugo121]

п 4. не понял - если не сохранять, то зачем тогда вообще обновлять?
Или данные из тех книг берутся макросом после пересчёта? Сомневаюсь...

[роман-талица]

Сообщение от Hugo121

п 4. не понял - если не сохранять, то зачем тогда вообще обновлять?
Или данные из тех книг берутся макросом после пересчёта? Сомневаюсь...

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

[роман-талица]

Каждая книга которая делает подсчеты 106 Мб и у меня комп виснет не может открыть одновременно 2 и больше .

[RAN.]

Игорь, вставь в главную книгу =СЧЁТЕСЛИ() со ссылкой на вторую, а во вторую =А1 со ссылкой на главную, и все увидишь.
Но кто такие 100 книг придумал?
Вероятно, достаточно просто открыть/закрыть. Остальное excel сам подхватит.

Sub qq()
    iPath = ThisWorkbook.Path & "\"
    iFileName = Dir(iPath)
    Do While iFileName <> ""
        If iFileName <> ThisWorkbook.Name Then
            With Workbooks.Open(Filename:=iFileName, UpdateLinks:=True)
                .Close False
            End With
        End If
        iFileName = Dir
    Loop
End Sub