Всем доброго вечера!

Проблема следующая:
Есть надстройка, которая при открытии файлов обновляет их. Занимает этот процесс разное время на разных файлах. После того, как надстройка закончила работу, должен запуститься скрипт, который сохраняет и закрывает книгу.

Мне необходимо как-то указать vba/vbs скрипту, что надстройка закончила работу и можно сохранять и закрывать файл. Сейчас просто стоит фиксированная задержка, что не является хорошим решением.

Пока что придумал два варианта решения проблемы:
1. Сравнивать текущее время с временем последнего изменения файла + 5-10 секунд.
К сожалению, не смог нагуглить возможно ли вообще получить эту информацию. DateLastModified возвращает дату последнего сохранения файла. Поэтому если изменить ячейки в книге сейчас, все равно возвращается дата последнего сохранения.
Грубо говоря:
В 20:00 открыли файл, в 20:10 внесли изменения в ячейку, книгу не сохраняли.
Как можно получить это время 20:10?

2. Проверять загрузку процессора. Во время работы надстройки cpu загружает до 30%, по окончанию падает до 1%. Тоже пока сложности с этим.

Возможно, кто-то может подсказать еще какое-то решение?
В идеале хочу реализовать это в рамках именно vbs скрипта, но если поможете подсказать решение хотя бы в vba, то мне будет легче нагуглить как это натянуть на vbs. На крайний случай можно использовать и vba решение.

Всем спасибо

Нужно при соблюдении условия проигрывать звук, пока условие не прекратит выполнятся.
Важная деталь: изменения на листе происходят через ссылки на соседний лист и обработке этой информации
То есть, если из соседнего листа передалась новая инфа, и условие начало соблюдаться на нашем листе, то нужно, чтобы начала бить тревога.

Ранее работал этот код

Лист:
Модуль:
Но после того, как данные перестали парсится на сам Лист, а просто браться из соседнего листа, то все это дело работать перестало
На соседний лист данные поступают этим образом:
http://www.planetaexcel.ru/forum/index.php?PAGE_NAME=message&FID=1&TID=82290&TITLE_SEO=82290-obnovly...

Возможно, это можно решить, переместив код Листа в Книгу, сделав WorkBook_SheetChange, но я не могу найти, как в if добавить ссылку на ячейки на листе, то есть, чтобы было что-то вроде:
Также пытался это решить путем создания функции, которая играет звук при соблюдении условия. Но ее проблема в том, что она проигрывает звук всего 1 раз. Чтобы играла дальше, нужно менять что-то на листе.

Пытался это решить следующим образом:

Звук играет непрерывно, но проблема в том, что играет и тогда, когда условие уже не выполняется. И как отключить его - не совсем понимаю. Точнее я сделал еще 1 функцию, которая проигрывает звук без параметра snd_loop, но тогда этот звук проигрывается каждый раз, когда что-то меняется вручную на листе.

Есть Файл "NewExcelFile.xls", который отдельным скриптом раз в минуту (или другое время) обновляется (а точнее переписывается)

И есть мой файл "Test.xlsm"

Мне нужно в файле Test брать актуальные данные из файла NewExcelFile.
На крайний случай можно просто в него копировать данные из файла раз в 15-30 секунд.

Сейчас если я ссылаюсь на ячейки из NewExcelFile, то они не обновляются, пока не откроешь NewExcelFile. Постоянно держать его открытым я не могу, в таком случаи скрипт не может пересоздать этот файл.

Подскажите пожалуйста решение проблемы

Офис 2016 х32, вин10

Почему-то бывают проблемы с подвисанием экселя при попытке клацнуть в строку формул/вставить данные/изменить тип вставки/протяжки формул и тд. Жду от 5 до 30-60 секунд, пока эксель протупит.

Комп не слабый, ничем не загружен. Возникает и в свежесозданных документах, где данных практически нету

Гуглил, пытался отключать аппаратное ускорение по совету - не помогло.
В 2003 ворде да на 7 винде проблем таких не было, но возвращаться на них не хочу.

Может, есть популярные причины таких проблем и что-то посоветуете?

Добрый день!

Нужно, чтобы макрос всегда делался в конкретной книге эксель (Test 2)
Все работает верно, пока не открываешь какой-то другой эксель документ. В этом случаи я получаю сообщение, что не найден лист "Рынок".
Мне же нужно, чтобы в файле Test 2 макрос выполнялся всегда, даже когда я работаю с другими документами excel.

Добавление строчки Set Wb = Workbooks("Test 2.xlsm") привело лишь к тому, что макрос не работает, если файл называется по-другому, но проблему не решил - при открытии еще любого эксель файла выдает ошибку о том, что не находится нужный лист "Рынок"


Module 1

Скрытый текст

Option Explicit Dim dtNext As Date Dim dtSiguiente As Date Sub CreateOrUpdateQueryTable()    Dim ws As Worksheet    Dim qt As QueryTable    Dim Wb As Workbook    Dim strQTName As String        Application.DisplayAlerts = False    strQTName = "MyQueryTable"    Set Wb = Workbooks("Test 2.xlsm")    Set ws = Worksheets("Рынок")        On Error Resume Next    Set qt = ws.QueryTables(strQTName)    qt.Refresh BackgroundQuery:=False    On Error GoTo 0    Application.DisplayAlerts = True End Sub

Добрый день!

Механизм работы:
Есть внешний источник данных с сайта в интернете. На ресурсе размещена динамически обновляемая таблица, которая тянется в эксель. Обновление в экселе ежеминутное (поставил бы чаще, но возможности такой в экселе не нашел).

Проблема:
Иногда сайт, с которого тянется таблица - лежит.
Иногда на сайте нету инфы в этой таблице.

В обеих этих случаях я получаю уведомление от экселя, что либо сайт лежит, либо что данных нету. И пока я не нажму "ок" - эксель не будет обновлять данные. А это большая проблема, потому что данные нужно собирать постоянно.

Что хочу:
Чтобы не выскакивало уведомление об ошибках получения данных - я о них знаю. Я хочу, чтобы эксель продолжал каждую минуту пытаться тянуть инфу с сайта.

На данный момент я просто юзаю сторонний софт, который тыкает по этой кнопке "ок" - но хотелось бы избавиться от этого костыля.

Я много дней мучал поиск, но похожей проблемы нигде не нашел, по-этому надеюсь на вашу помощь.
Заранее спасибо!